Андрей
5 год назад
Составьте программу одномерного массива (10 ячеек), с помощью генератора случайных чисел (диапазон от -500 до 500). Найти минимальное и максимальное, значение всего массива, найти сумму всех двузначных положительных чисел.Очень срочно!!!!!!!!!!!
ОТВЕТЫ
Карл
Oct 24, 2020
begin
var a:=ArrRandom(10,-500,500); a.Println;
Writeln('min=',a.Min,', max=',a.Max,', Sп=',
a.Where(x->x in [10..99]).Sum)
end.
475 186 243 323 -497 23 -65 -2 180 74
min=-497, max=475, Sп=97
575
Смежные вопросы:
