Question

найти все двузначные числа,которые кратны числу N(программирование паскаль)

Answer 1

//PascalABC.NET (версия 3.1, сборка 1210 от 29.03.2016)
var a,i:integer;
begin
  write('Введите число ');
  readln(a);
  for i:=10 to 99 do
    if i mod a = 0 then writeln(i,' кратно ',a);
end.

Тестовое решение:
Введите число 6
12 кратно 6
18 кратно 6
24 кратно 6
30 кратно 6
36 кратно 6
42 кратно 6
48 кратно 6
54 кратно 6
60 кратно 6
66 кратно 6
72 кратно 6
78 кратно 6
84 кратно 6
90 кратно 6
96 кратно 6