Разберите программу,которая находит количество двузначных чисел,кратных 7

Question

Разберите программу,которая находит количество двузначных чисел,кратных 7

Comments

Что значит "разберите программу"?

Answer 1

На паскале:
var k,i:integer;
begin
for i:=10 to 99 do
if (i mod 7) = 0 then
k:=k+1;
writeln(k)
end.