Program PascalGuru;
var
i: integer;
n, m, k: integer;
begin
write('n= ');
readln(n);
write('m= ');
readln(m);
i := n - 1;
k := 0;
repeat
inc(i);
if (i mod 9 = 3) or (i mod 9 = 4) then
begin
inc(k);
writeln(i);
end;
until i = m;
writeln;
writeln('Kol-vo= ', k);
readln;
end.