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

Question

Напишите программу, осуществляющую чтение из исходного текстового файла input.txt вход- ных данных (коэффициентов a, b, c), сумму этих коэфициентов ивывод результатов в выходной текстовый файл output.txt. Предполагается, что в input.txt вкаждой строке записаны знаения а,b,c через пробел, а в выходной файл записывается ответ(сумма этих трех перемнных).Pascal abc

Answer 1

PascalABC.NET

Ответ:

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

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

Comments

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