Cho F là một tệp văn bản chứa các xâu 10 kí tự. Hãy viết chương trình nhập và biểu thị nội dung tệp đó lên màn hình, mỗi xâu một dòng.

var s: string[10];

      f: text;

Begin

    Assign(f, ‘input.inp’); reset(f);

    While not eof(f) do

       Begin

           readln(f, s); 

           Writeln(s);

      end;

   Readln

End.