Question

на Pascal написать программу, которая из последовательности чисел определит кол-во чисел больше 9 и кратных 5. последнее число - 0. спасибо заранее!

Answer 1

Ответ:

PascalABC.NET

begin

 var N := ReadInteger('Сколько чисел? ');

 var A := ReadArrInteger('Вводи: ', N);

 A.Where(x -> (x > 9) and (x mod 5 = 0)).Count.Println;

end.