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