[pascal] EOF 입력

C언어에서는 getchar() ,scanf() 등은 EOF 를 만나면 EOF-1 을 반환하고

gets() 등은 NULL을 반환한다.

Pascal 또한 EOF 까지 입력을 받을수 있는데, C에서는 표준입력이 stdin 이지만

pascal 에서는 그냥 input이다.

program main;
uses sysutils;
var
  s:string;
begin
  while(not eof(input))do
  begin
    readln(s);
    writeln(s);
  end;
end.