Предмет: Информатика,
автор: nikivanov3195
Программа на паскале
в текстовом файле записано 10 имен, по одному с новой строки . Вывести в другой тестовый файл самое длинное имя .
Ответы
Автор ответа:
0
// PascalABC.NET 3.2, сборка 1449 от 23.05.2017
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ReadAllLines('input.txt');
var i:=a.Select(s->s.Length).ToArray.IndexMax;
WriteLines('output.txt',Seq(a[i]))
end.
Программе совершенно неважно, сколько и каких строк записано во входном файле input.txt
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ReadAllLines('input.txt');
var i:=a.Select(s->s.Length).ToArray.IndexMax;
WriteLines('output.txt',Seq(a[i]))
end.
Программе совершенно неважно, сколько и каких строк записано во входном файле input.txt
Автор ответа:
0
Единственное условие - входной файл не должен быть пустым.
Похожие вопросы
Предмет: Математика,
автор: magomadov000024
Предмет: Русский язык,
автор: nareksirakanan7
Предмет: Русский язык,
автор: kiptexx
Предмет: Алгебра,
автор: maks20152