Надо решить следующую : найти минимальное число из 10 случайных чисел. диапазон генерации случайного числа задается пользователем в начале работы программы. (использовать форматированный ввод/вывод)

yarikkuisluiy yarikkuisluiy    1   29.05.2019 00:20    1

Ответы
Sashalizanika Sashalizanika  26.06.2020 20:20
Var a,k.b:integer;
begin
b:=10000000;
for k:=1 to 10 do begin
read(a); if a<b then b:=a end;
write(b);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика