Определить минимальное время прохождения 100-метровой дистанции 25 спортсменов, если...

0 голосов
20 просмотров

Определить минимальное время прохождения 100-метровой дистанции 25 спортсменов, если время каждого вводится случайными числами и находится в диапазоне от 8 до 65 секунд. Информатика 9 класс PASCAL.


Информатика (78 баллов) | 20 просмотров
0

за 40 баллов сделаю быстро

0

Щас пересоздам, будет за 40.

Дан 1 ответ
0 голосов

Вариант со случайными числами

var i,min,k:integer;


begin


min:=100;


randomize;


for i:=1 to 25 do begin k:=random(8,65); if k

writeln(min);


end.


Вариант с вводом чисел с клавиатуры

var i,min,k:integer;


begin


min:=100;


for i:=1 to 25 do begin readln(k); if k

writeln(min);


end.

(1.9k баллов)