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

Вадим98913 Вадим98913    1   18.09.2019 00:20    0

Ответы
heyguys112 heyguys112  07.10.2020 22:57
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.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика