Question

Даю 35 баллов
Информатика

Answer 1

===== PascalABC.NET =====

begin

 // 1

 var a := ArrRandom(50, -100, 100);

 a.Println.Where(p -> p mod 10 = 0).Println;

 Writeln('- 2 -');

 // 2

 var b := ArrRandom(10, -25, 25);

 b.Println.Max.Println;

 Writeln('- 3 -');

 // 3

 var c := ArrRandom(5, -25, 25);

 c.Println.Min.Println;

 Writeln('- 4 -');

 // 4

 var d := ArrRandom(15, -25, 25);

 d.Println.Where(p -> p mod 5 = 0).Max.Println

end.