Вывести первый, второй, предпоследний и последний элементы файла целых чисел

@Ярослав супер · Регистрация: 15.12.2015

Студворк — интернет-сервис помощи студентам

Заданный файл целых чисел, содержащий не менее четырех элементов. Вывести первый, второй, предпоследний
и последний элементы данного файла.

@Cyborg Drone · 25.03.2016, 19:21

Pascal

var f: file of integer;
    t: integer;
begin
  assign(f, 'f.dat');
  reset(f);
  read(f, t);
  write('            1: ');
  read(f, t);
  write('            2: ');
  seek(f, filesize(f) - 2);
  read(f, t);
  write('Предпоследний: ');
  read(f, t);
  write('    Последний: ');
  close(f)
end.

@Ярослав супер 0 / 0 / 0 Регистрация: 15.12.2015 Сообщений: 5
		1
	Вывести первый, второй, предпоследний и последний элементы файла целых чисел 23.03.2016, 12:57. Показов 4150. Ответов 1 Метки нет (Все метки) Заданный файл целых чисел, содержащий не менее четырех элементов. Вывести первый, второй, предпоследний и последний элементы данного файла. 0

Опции темы

Вывести первый, второй, предпоследний и последний элементы файла целых чисел

Решение