Ввод с клавиатуры значения переменной N

program Inp;
   uses Crt;
   var
       N: integer;
begin
ClrScr;
   write('Введите число с клавиатуры:');
   readln(N);     { Здесь программа приостановится и будет ожидать ввода с клавиатуры. Наберите на клавиатуре число, например 153, и нажмите клавишу Enter}
   writeln('Bы ввели число ', N);
   readln     { Это оператор пустого ввода. Здесь программа опять приостановится и будет ожидать нажатия клавиши Enter. За это время вы успеете просмотреть вывод на экране.}
end.