Даны случайные числа ,найти минимальное из них pascal

OlyaPo1 OlyaPo1    2   22.09.2019 20:10    0

Ответы
Федёк5 Федёк5  08.10.2020 10:26
PascalABC.NET 3.3.5, сборка 1659 от 09.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  var a:=ArrRandom(ReadInteger('n='),-50,50); a.Println;
  Writeln('Минимальный элемент ',a.Min);
end.

Пример
n= 18
-14 13 39 -5 -39 -8 39 41 -2 -49 -32 18 -33 -50 10 2 -2 3
Минимальный элемент -50
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика