Помогите срочно!!! найдите минимальное из n чисел на паскале

Ответы:
Лена Бедарева
24-09-2015 01:21

var  i, min, a, n: integer;begin  min := trunc(power(2, 31) - 1);  readln(n);  for i := 1 to n do  begin    readln(a);    if (a < min) then      min := a;  end;  writeln(min);end.

Также наши пользователи интересуются:

Картинка с текстом вопроса от пользователя Окси Гущин

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Помогите срочно!!! найдите минимальное из n чисел на паскале» от пользователя Окси Гущин в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!