Курсовая работа: Игра "Vertolet"

t:=readkey;

end;

until Ord(t)=13;

clrscr;

writeln('');

writeln('');writeln('');writeln('');writeln('');writeln('');writeln('');writeln('');

writeln('');writeln('');writeln('');writeln('');

writeln(' You had gone =', kolop,' meters');

writeln('');writeln('');

writeln('');writeln('');writeln('');writeln('');writeln('');writeln('');writeln(''); delay(10000);

writeln (' Press Enter');

repeat

t:=readkey;

until Ord(t)=13;

(*begin

clrscr;

writeln('');

writeln('');writeln('');writeln('');writeln('');writeln('');writeln('');writeln('');

writeln('Выражаю благодарность за помошь в тестировании игры группе ИВТ-06-2 и лично ');

{setcolor(12); }

writeln('Павлу Просянникову {Пахе старому}');

writeln('');

{setcolor(4); }

writeln('Выражаю благодарность за помошь в написании сценария игры ');

{setcolor(12); }

writeln('Левону, Любе, Михаилу') ;

{setcolor(4); }

writeln('');writeln('');

writeln('');writeln('');writeln(''); delay(10000);