Дан равномерный массив заданный случайным образом в деопозоне {-15:15} вычеслите сумму положительных элементов.Программу Паскаль

ghenek2004 ghenek2004    2   25.02.2020 17:56    1

Ответы
соаовоых соаовоых  11.10.2020 12:59

PascalABC.NET

begin

 var A := ArrRandom(ReadInteger('длина: '), -15, 15);

 A.Where(x -> x > 0).Sum.Println;

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика