PROGRAM6456.PAS

{* Графика *}

{ Выберите программу или раздел при помощи графического манипулятора «Мышь» ! }
Case User Of
  •  'Графический режим' : Uses .pas; { Пульсирующий эллипс ...
    Рисование домика ...
    Рисование Корабля ...
    Рисование звезды ...
    Прямоугольник движется с помощью стрелок ...
    Движение круга ...
    Полет ракеты ...
    Перекатывающийся кубик ...
    Заполнение стакана водой ...
    }
  •  'Текстовый режим' : Uses .pas; { Движение прямоугольника ...
    Пирамида из звездочек ...
    }
Else
 writeln('Ничего не выбрано!');
End;
Program pas;

.....