Программа в Pascal не выдаёт результат
Программа не выдаёт результат. То есть результат строки writeln(n); вообще не выводится, в чем ошибка ?