Напишите программу которая находит минимальное и максимальное среди положительных чисел, записанных в файле и выводит из в другой файл.учтите,что таких чисел может и не быть поскорей на паскале

НикВероник1 НикВероник1    2   29.09.2019 15:30    9

Ответы
lenadub lenadub  09.10.2020 03:11
PascalABC.NET 3.4.2, сборка 1837 от 11.10.2018Внимание! Если программа не работает, обновите версию!

begin

 var a := ReadAllText('input.txt').ToIntegers.Where(t -> t > 0);

 if a.Count>0 then WriteAllText('output.txt', $'{a.Min} {a.Max}')

end.

Первое вложение - файл input.txt, второе - output.txt

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика

Популярные вопросы