Предмет: Информатика,
автор: aRtEm4792
Напишите программу, которая в последовательности натуральных чисел определяет максимальное число, оканчивающееся на 3. Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется число, оканчивающееся на 3. Количество чисел не превышает 1000. Введённые числа не превышают 30 000. Программа должна вывести одно число — максимальное число, оканчивающееся
На вход числа 3 13 23 3 вывод 23
на 3.
НАпишите на паскале
Ответы
Автор ответа:
1
===== PascalABC.NET =====
begin
var n := ReadInteger;
ReadSeqInteger(n).Where(p -> p mod 10 = 3).Max.Print
end.
Приложения:
все равно спасибо
она тогда не родилась
ладна спс,я еще раз задачу опубликую надеюсь напишут на паскале вида которого я сверху прислал,пока
Похожие вопросы
Предмет: Русский язык,
автор: Аноним
Предмет: Русский язык,
автор: marina1001369
Предмет: Английский язык,
автор: CasandraG
Предмет: Геометрия,
автор: Аноним
a, s: integer;
begin
s:= 0;
readln(a);
while a<>0 do begin
if (a mod 3 = 0) and (a mod 10 = 8) then
s := s + a;
readln(a);
end;
writeln(s)
end.