Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
genatbukin
12.02.2021 00:48 •
Информатика
Программа на паскале в текстовом файле записано 10 имен, по одному с новой строки . вывести в другой тестовый файл самое длинное имя .
Ответ:
juliagolub2015
06.10.2020 11:47
// 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
0,0
(0 оценок)
Популярные вопросы: Информатика
lapohka181202
29.05.2022 11:05
Несжатое растровое изображение размером 256 на 128 пикселей занимает 16 к б памяти каково максимально возможное число цветов палитре изображения...
ВоржеваСоня
28.02.2020 18:57
Составить программу , которая позволит выводить количество дней в году, в зависимости от года, високосный и невисокосный. при вводе числа месяца будет выводить название месяца...
zulya24
15.10.2020 12:55
Всоревнованиях по шахматам толя, ира и костя заняли три первых места. толя не занял ни первое, ни второе место. ира заняла второе место. какое место занял толя?...
vladislavkraso
15.10.2020 12:55
Составьте для чертежника алгоритм рисования равнобедренного треугольника, если известны координаты концов отрезка, являющегося его высотой (4, 1) и (4, 6), а также координаты...
nfyrb2014
15.10.2020 12:55
Нужно в паскале написать программу , которая сложит все натуральные числа в диапазене от a до b. (например от 23 до 74)...
ksyumikk2003
30.07.2021 04:26
Программа паскаль. составить программу, которая запрашивает у пользователя целое число, действительное число, произвольный символ строку, а затем все выводит в одной строчке....
123Никита5634
04.03.2021 15:56
Для какого из чисел ложно высказывание: не (число 100) или (число чётное)? 1) 1000 2) 100 3) 55 4) 2...
hohlov228
30.07.2021 04:26
Записать по правилам языка паскаль следующее утверждение x2-3√x4-25√x : 3,6-x3...
Damirkair2003
30.07.2021 04:26
Какие перемещения по большому текстовому документу вам известны...
VikaGrin1
30.07.2021 04:26
Каковы основные недостатки растрового и векторного изображения? каковы основные достоинства растрового и векторного изображения? за хороший ответ 13 пунктов...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ReadAllLines('input.txt');
var i:=a.Select(s->s.Length).ToArray.IndexMax;
WriteLines('output.txt',Seq(a[i]))
end.
Программе совершенно неважно, сколько и каких строк записано во входном файле input.txt