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

July 2022 1 10 Report

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

rus10011111 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.

1 votes Thanks 1

dfedoseenkop34a4l Можно по русски?

rus10011111 Что нужно? Блок-схема? Или что?

dfedoseenkop34a4l Программа

rus10011111 Ну? А это что по-твоему?