блок 3 задание 6

program V; - программа V
uses crt; - USES указывает программе, что необходимо подключить дополнительный внешний модуль (файл с описанием и определение различных функций).
Crt является одним из стандартных модулей. В нем описаны и определены функции для работы с текстовой информацией на дисплее (изменение цвета текста, управление курсором и др.).
var n: integer;var - Это раздел описания переменных.
P, Code : integer;
  Str: string;-Строковая переменная - это последовательность символов с динамической длиной, и постоянным максимальным размером в диапазоне от 1 до 255.
Begin -это служебное слово означает, что начался раздел действий
repeat - цикл - повторять до тех пор, пока не выполнено условие
  Write('Введите n: '); - ввод данных
  Readln(str); {Вводим строку} - ввод даных
  Val(Str, p, Code); - Выполняет преобразование строки, изображающей целое или вещественное число, в число
if Code<>0 then Writeln('Неправильный ввод! Ошибка в позиции: ',Code); - условие
until Code = 0; - цикл
n:=P;
Writeln('Введено: ',n); - вывод данных
Readln; - вывод данных
End. - конец прграммы