{* Графика *}

{ Выберите программу или раздел при помощи графического манипулятора «Мышь» ! }
Case User Of

•  'Графический режим' : Uses .pas; { Паутина ...
  Заполнение стакана водой ...
  Перекатывающийся кубик ...
  Полет ракеты ...
  Движение круга ...
  Прямоугольник движется с помощью стрелок ...
  Рисование звезды ...
  Рисование Корабля ...
  Рисование домика ...
  }
•  'Текстовый режим' : Uses .pas; { Движение прямоугольника ...
  Пирамида из звездочек ...
  }

Else
 writeln('Ничего не выбрано!');
End;

---

Program pas;

.....