Надо решить следующую : найти минимальное число - вопрос №212199010 от morfikk 05.08.2021 03:58

Question

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

morfikk · Answer

Var a,k.b:integer;beginb:=10000000;for k:=1 to 10 do beginread(a); if a b then b:=a end;write(b);end....