Практическая работа №7 (9 класс)

Строчка var

var a: array [1..10] of real; s, max, min, win, rek: real; n, i: integer;

Фрагмент определения максимального времени

Фрагмент определения минимального времени

Фрагмент определения кол-ва самых быстрых бегунов

Фрагмент определения побит или нет рекорд