Пусть дан текстовый файл. Распечатайте строку с заданным номером - Pascal ABC

Формулировка задачи:

Пусть дан текстовый файл. Распечатайте строку с заданным номером. Заранее спасибо)!!!

Код к задаче: «Пусть дан текстовый файл. Распечатайте строку с заданным номером - Pascal ABC»

textual
Readln(N);
Reset(f);
While not EOF(f) and (n>0) do
Begin
  Readln(f,St);
  Dec(n);
End;
Close(f);
Writeln(St);

7   голосов, оценка 3.571 из 5


СОХРАНИТЬ ССЫЛКУ
Похожие ответы