Регистрация
Войти
Стать экспертом Правила
Информатика

Сумма 10 случайных чисел. Вывести числа больше 5. Найти минимальное число среди них. На языке Паскаль.

ОТВЕТЫ



begin
  var a:=ArrRandom(10,-50,50); a.Println;
  Writeln('S=',a.Sum);
  Writeln('min=',a.Where(x->x>5).Println.Min)
end.


25 28 13 32 11 34 15 -37 -13 50
S=158
25 28 13 32 11 34 15 50
min=11
876
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам