Найти все числа, которые делятся ** N среди:а)всех двузначных чисел;б)всех трёхзначных...

Question

Найти все числа, которые делятся на N среди:
а)всех двузначных чисел;
б)всех трёхзначных чисел.

Answer 1

Var
i,n:longint;
begin
readln(n);
for i:=10 to 99 do
  if i mod n=0 then writeln(i);
end.
во втором случае цикл начинаем со 100 и до 999

Comments

СПАСИБО!

---

что значит int(a)