uses crt;
var N,i:integer;
s1:text;
begin
writeln('Vv N');
readln(N);
assign(s1, 'C:\input.txt');
reset(s1);
readln(s1);
i:=0;
while not(EOF(s1)) do
begin
readln(s1);
inc(i);
end;
reset(s1);
while(i>N) do
readln(s1);
while(i<>0)do
begin
readln(s1);
writeln('Poslednije N strok:');
writeln(s1);
dec(i);
close(s1);
end;
end.

Добавлено через 2 часа 31 минуту
Всё, уже не нужно.

Заказать работу у эксперта

Programming

Эксперт

94731 / 64177 / 26122

Регистрация: 12.04.2006

Сообщений: 116,782

01.03.2015, 15:02

Ответы с готовыми решениями:

Удалить из файла последние K строк
Дано целое число K (0 < K < 10) и текстовый файл, содержащий более K строк. Удалить из файла...

Cтрока: Распечатать последние n строк заданного текста...
Дан массив символьных строк.Если в командной строке не заданы аргументы,распечатать все строки,а...

Добавить в указанное место файла заданное количество записей, начиная с указанного места другого файла
помогите сделать . Добавить в указанное место файла заданное количество записей, начиная с...

В консоли показываются только последние 25 строк
Доброго времени суток. При написании консольной программы на Pascal'е (с использованием модуля CRT)...

	01.03.2015, 15:02

IT_Exp

Эксперт

87844 / 49110 / 22898

Регистрация: 17.06.2006

Сообщений: 92,604

01.03.2015, 15:02

Помогаю со студенческими работами здесь

В командной строке задается имя входного файла и целое число Н. Распечатать последние Н строк указанного файла
В командной строке задается имя входного файла и целое число Н. Распечатать последние Н строк...

Распечатать последние n строк смвольного массива
Не могу написать программу:дан массив символьных строк.Если в командной строке не заданы...

Добавить в указанное место файла заданное количество строк, начиная с указанного места другого файла
Добавить в указанное место файла заданное количество строк, начиная с указанного места другого...

Удалить из файла последние K строк
Дано целое число K (0 < K < 10) и текстовый файл, содержащий более K строк. Удалить из файла...

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:

Наверх