Составьте программу, которая формирует массив, содержащий 18 случайных чисел, принадлежащих промежутку [2; 9], и подсчитывает сумму положительных элементов. для результата использовать форматный вывод. p.s. буду !

sneginka2003 sneginka2003    2   30.09.2019 16:40    1

Ответы
balasanyansilva balasanyansilva  27.08.2020 10:17
PascalABC.NET 3.4.2, сборка 1843 от 24.10.2018Внимание! Если программа не работает, обновите версию!

begin

 var a := ArrRandom(18, 2, 9);

 a.Println;

 WriteFormat('S = {0:###}', a.Where(t -> t > 0).Sum)

end.


5 7 8 4 3 3 9 8 7 5 6 9 8 7 2 7 8 4S = 110
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика