Сформулируйте условие задачи, которую решает данная программа: var c,k:integer; begin...

Question

Сформулируйте условие задачи, которую решает данная программа:
var c,k:integer;
begin
k:=0;
for c:=10 to 99 do
if c mod 7 = 0 then k:=k+1;
writeln('k='k);
end.

Answer 1

В программе подсчитывается количество двухзначных чисел, которые делятся на 7 без остатка (14, 21, ... , 98)