Время работы программы - Turbo Pascal

Формулировка задачи:

Подскажите, пожалуйста, как определить точное время работы программы, чтобы знать, уложилась ли я в ограничения, которые указывают в начале почти каждой задачки?

Код к задаче: «Время работы программы - Turbo Pascal»

textual
var
  t, z : real;
begin
  t := milliseconds;
  writeln(t, ' время начала работы');
  readln(z);
  writeln((milliseconds - t)/1000, '(сек) время работы программы')  
end.

7   голосов, оценка 3.857 из 5


СОХРАНИТЬ ССЫЛКУ