{* Графика *}

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

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

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

---

Program pas;

.....