uses PT4, PT4Demo;
begin
// для отображения окна задачника
// надо закомментировать вызов процедуры MakeText
  MakeText('Demo');
  Task('Demo7?');
end.