Question

Помогите пожалуйста
В классе 30 учеников писали контрольную работу по информатике. Определите, сколько человек получили оценки "4" и "5".



(Массив заполняется случайными оценками от 2 до 5 баллов)

​

Answer 1

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

begin

 var a := ArrRandom(30, 2, 5);

 a.Println.Count(p -> p > 3).Println

end.