50баллов.Паскаль. Дан целочисленный массив из 30 элементов заданный случайным образом....

0 голосов
64 просмотров

50баллов.Паскаль. Дан целочисленный массив из 30 элементов заданный случайным образом. элементы массива могут принимать целые значения от 0 до 100 -баллы учащихся за тест по информатике. составьте программу, которая позволяет найти и вывести количество учащихся, чья оценка за тест четная и больше 45 баллов.


Информатика (114 баллов) | 64 просмотров
Дан 1 ответ
0 голосов

//PascalABC.NET 3.4.2

begin

 var ar := arrrandom(30, 0, 100).Println;

 ar.Where(x -> (x mod 2 = 0) and (x > 45)).Print;

end.

(276 баллов)