Найти числа, которые делятся на 13 из двухзначных чисел - Pascal

В данном коде выполняется следующий алгоритм:

1. i := 1 - инициализация переменной i значением 1.
2. for i := 1 to 99 div 13 do - начало цикла, который выполняется от 1 до 99/13 (т.е. 7 раз).
3. Write(i*13:3) - вывод на экран значения переменной i*13 (т.е. числа, кратного 13) в формате 3 символа.
4. i := i + 1 - увеличение значения переменной i на 1 после каждой итерации цикла. Таким образом, в результате выполнения данного кода на экран будут выведены все числа, кратные 13, в формате 3 символа.