Нужно перевести задачу с С на Паскаль - Pascal

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

Помогите перевести задачу с С в паскаль. Заранее спасибо

                    Листинг программы
                
 
                        
                          
                    
#include <stdio.h>
 
int main()
{
    int i, j, n;
    puts("Input number stages:");
    scanf("%d", &n);
    for(i = 0; i < n; i++){
        for(j = 0; j < n; j++){
            if(j < n - 1 - i)
                printf(" ");
            else
                printf("#");
        }
        printf("#");
        printf("\n");
    }
    return 0;
}

Решение задачи: «Нужно перевести задачу с С на Паскаль»

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

program fromC;
var  i, j, n : integer;
begin
    Write('Input number stages:');
    ReadLn(n);
    for i := 0 to n-1 do begin
        for j := 0 to n-1 do begin
            if(j < n - 1 - i) then
                Write(' ')
            else
                Write('#');
        end;
        WriteLn('#');
    end;
end.

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

Объявление переменных:
- i: целочисленная переменная, используется для итерации по внешнему циклу.
- j: целочисленная переменная, используется для итерации по внутреннему циклу.
- n: целочисленная переменная, в которую будет сохранено введенное количество этажей.
Вывод строки Input number stages: для запроса ввода количества этажей.
Считывание значения количества этажей и сохранение в переменную n.
Начало внешнего цикла с итерациями от 0 до n-1, включительно.
1. Начало внутреннего цикла с итерациями от 0 до n-1, включительно.
  1. Если значение j меньше, чем n - 1 - i, то выводится пробел.
  2. В противном случае, выводится знак '#'.
2. Переход на новую строку после завершения внутреннего цикла, вывод символа '#' для создания этажа.
Конец внешнего цикла.
Конец программы.