Помогите написать программку на паскале.Федя с клавиатуры последовательность естественных
Помогите написать программу на паскале.
Федя с клавиатуры последовательность естественных чисел. Он желает получить и вывести на экран очень вероятную сумму 3-х чисел из последовательности, каждое из которых заканчивается на цифру 3.
Программка получает на вход количество чисел в последовательности, а потом сами числа. В последовательности всегда имеется число, заканчивающееся на 3. Количество чисел не превосходит 10 в 6. Введённые числа не превышают 30000.
Программка обязана вывести одно число - максимальную сумму 3-х чисел, каждое из которых заканчивается на цифру 3. Если чисел, отвечающих условия не нашлось, выводится 0.
Пример:
вход: 6 7 13 15 3 23 103
вывод: 139
PascalABC.NET 3.4.2, сборка 1814 от 02.10.2018
begin
var a := ReadArrInteger(ReadInteger).Where(t -gt; t mod 10 = 3)
.SortedDescending;
Println(a.Count gt;= 3 ? a.Take(3).Sum : 0)
end.
-
Вопросы ответы
Статьи
Информатика
Статьи
Математика.
Физика.
Математика.
Разные вопросы.
Разные вопросы.
Математика.
Разные вопросы.
Математика.
Физика.
Геометрия.