Дан одномерный массив элементы которого могут быть числа от одного до 1000, Посчитать количество элементов который заканчивается на семь

Question

Информатика

Павля

3 сентября, 16:25

Дан одномерный массив элементы которого могут быть числа от одного до 1000, Посчитать количество элементов который заканчивается на семь

+2

Ответы (1)

Знаете ответ?

Памфил · Answer 1

Var

a, n, k: integer;

begin

k : = 0;

readln (n) ;

for t : = 1 to n do

begin

readln (a) ;

if a mod 10 = 7 then k : = k + 1;

end;

writeln (k) ;

end.