Строчка var
var a: array [1..10] of real; s, max, min, win, rek: real; n, i: integer;
Фрагмент определения максимального времени
Фрагмент определения минимального времени
Фрагмент определения кол-ва самых быстрых бегунов
Фрагмент определения побит или нет рекорд
0 коммент.:
Отправить комментарий