Написать программу, которая n раз выводит на экран слова : Привет, друг!

Зачем последний "readln;"? Без него норм

А, я же на АБС, у меня не сразу все вылетает)

//Pascalvarn, i: integer;beginwrite('Введите n: '); readln(n);for i := 1 to n dowriteln('Привет, друг!');readln;end.

//Pascalvar  //Объявление переменныхn, i: integer;  //Объявляем переменные n - количество повторов и i - счетчик для циклаbegin  //Открытие логических скобокwrite('Введите n: ');  //Выводит текст на монитор 'Введите n: 'readln(n);  //запрашивает ввод с клавиатуры и заносит значение в переменную nfor i := 1 to n do  //Цикл от 1 до числа nwriteln('Привет, друг!');  //С каждым шагом цикла выводится сообщение 'Привет, друг!'readln;  //ожидание нажатия Enther после выполнения программыend.