Предмет: Информатика,
автор: orochi13101
Написать программу, которая заполняет массив А[1..50] случайными числами из диапазона (-100, 30), подсчитывает количество положительных элементов и их сумму.
Ответы
Автор ответа:
0
// PascalABC.NET
begin
var a := ArrRandom(50, -100, 30);
a.Println;
var s := a.Where(p -> p > 0);
Print(s.Count, s.Sum)
end.
Приложения:

Интересные вопросы
Предмет: Английский язык,
автор: kirnaruto
Предмет: Русский язык,
автор: Лия2002
Предмет: Русский язык,
автор: Лизка1929
Предмет: Литература,
автор: LUCKI1337
Предмет: Математика,
автор: Clown0701