Предмет: Информатика,
автор: Nеlly
Помогитеееее пожалуйста
Приложения:
Ответы
Автор ответа:
1
===== PascalABC.NET =====
begin
// 1
var a := ReadArrInteger(10);
a.Transform(p -> 5 * p);
a.Println;
a.Aggregate(BigInteger.One, (u, v) -> u * v).Println;
// 2
var b := ReadArrInteger(6);
b.Count(p -> (p > 0) and p.InRange(1, 9)).Println;
// 3
var c := ReadArrInteger(8);
c.Where(p -> (p mod 10 = 0) and p.InRange(150, 250)).Println
.Sum.Println;
// 4
var d := ReadArrInteger(5);
d.Where(p -> p mod 10 = 4).Min.Println
end.
Похожие вопросы
Предмет: Литература,
автор: VietnamWar6478
Предмет: Информатика,
автор: baskaaminov
Предмет: Математика,
автор: gavrisanna0
Предмет: Литература,
автор: polinamironova8
Предмет: Математика,
автор: Орви