Среди всех двузначных чисел вывести на экран те, которые делятся на 11 без остатка - Pascal

Формулировка задачи:

Среди всех двузначных чисел вывести на экран те, которые делятся на 11 без остатка. Нужны: цикл с параметром, цикл с предусловием, цикл с постусловием.

Решение задачи: «Среди всех двузначных чисел вывести на экран те, которые делятся на 11 без остатка»

Листинг программы

uses crt;
var i: integer;
begin
 clrscr;
 i:=10;
 repeat
  if i mod 11 = 0 then
   write(i,' ');
  inc(i);
  until i=100;
 readln;
end.

Объяснение кода листинга программы

В этом коде используется язык программирования Pascal. Вот список действий, которые происходят в этом коде:

Подключение модуля CRT (File and Printer I/O).
Объявление переменной i типа integer.
Очистка экрана с помощью функции clrscr.
Присваивание переменной i значение 10.
Повторение следующих действий до тех пор, пока i не станет равным 100:
1. Проверка, делится ли i на 11 без остатка (i mod 11 = 0).
2. Если условие выполняется, то на экран выводится значение i, за которым следует пробел.
3. Увеличение значения i на единицу (inc(i)).
Завершение цикла и прекращение выполнения программы после нажатия клавиши Enter с помощью функции readln.