Дан файл целых чисел, содержащий четное количество элементов. Удалить из данного файла...

0 голосов
91 просмотров

Дан файл целых чисел, содержащий четное количество элементов. Удалить из данного файла вторую половину элементов. (на паскале)


Информатика (333 баллов) | 91 просмотров
Дан 1 ответ
0 голосов
Правильный ответ

Предполагается, что целые числа (возможно, со знаками) записаны в текстовом файле и разделены одним или более пробелами. Допускаются также смены строки.

// PascalABC.NET 3.3, сборка 1590 от 03.12.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var a:=ReadAllText('in.txt').ToIntegers.ToArray;
  WriteAllText('out.txt',a[:a.Length div 2].JoinIntoString)
end.

(150k баллов)