Паскаль, цикл со счетчиком. вывести на экран все двузначные числа, которые нацело делятся на число, введённое пользователем.

Var k,i:integer;
begin
write('k='); readln(k);
for i:=10 to 99 do
 if i mod k = 0 then write(i,'  ');
end.

Пример:
k=5
10  15  20  25  30  35  40  45  50  55  60  65  70  75  80  85  90  95