Пример кода на Паскале:

program DivideByNumber;
var
i, number: integer;
begin
writeln('Введите число, на которое будем делить:');
readln(number);
if (number < 1) or (number > 99) then
writeln('Введите число от 1 до 99')
else
begin
writeln('Двузначные числа, которые делятся на ', number, ':');
for i := 10 to 99 do
begin
if (i mod number = 0) then
writeln(i);
end;
end;
end.

Пользователь вводит число, на которое мы будем делить двузначные числа. Затем программа выводит на экран все двузначные числа, которые делятся на это число нацело. В приведенном коде предполагается, что пользователь вводит только числа от 1 до 99.