Напишите программу, осуществляющую чтение из исходного текстового файла input.txt вход-

ных данных (коэффициентов a, b, c), сумму этих коэфициентов и

вывод результатов в выходной текстовый файл output.txt. Предполагается, что в input.txt в

каждой строке записаны знаения а,b,c через пробел, а в выходной файл записывается ответ(сумма этих трех перемнных).

Pascal abc

Ответы

Ответ дал: LRSM
1

PascalABC.NET

Ответ:

  • begin
  •  var a := ReadAllLines('input.txt');
  •  a.Transform(s -> s.ToWords.Sum(x -> x.ToInteger).ToString);
  •  WriteAllLines('output.txt', a);
  • end.

Пример работы:

Приложения:

LRSM: Можно и в одну строчку:
begin
WriteAllLines('output.txt', ReadAllLines('input.txt').Select(s -> s.ToWords.Sum(x -> x.ToInteger).ToString).ToArray);
end.
Вас заинтересует