readln.pas

 {ReadLn.PAS}
 
 { Пример программы для процедур ReadLn и WriteLn }
 
 Uses WinCrt;
 
 Var S : String;
 Begin
  Write('Введите строку текста: ');
  ReadLn(S);
  WriteLn('Вы ввели : ', s);
  WriteLn('Нажмите <Enter>, чтобы выйти.');
  ReadLn;
 End.