Question

вариант 6 распечатать все двухзначные числа, последняя цифра которых кратна 7 пжппжжппжжппжжпппжпжжпп

Answer 1

var i,a: integer;

begin

a:=17;

for i:=1 to 9 do begin

writeln(a);

a:=a+10;

end;

end.