50 БАЛЛОВ!!!!!! СРОЧНО.... Написать программу паскаль. Дано n натуральных чисел которые...

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

50 БАЛЛОВ!!!!!! СРОЧНО.... Написать программу паскаль. Дано n натуральных чисел которые вводятся по одному найти количество чисел последняя цифра которых равна 5


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

// PascalABC.NET

begin

 var n := ReadInteger('n =');

 ReadSeqInteger('Вводите:', n)

     .Count(p -> p mod 10 = 5)

     .Print

end.

(1.6k баллов)