Ответы
Ответ дал:
0
// PascalABC.NET 3.3, сборка 1599 от 17.12.2017
// Внимание! Если программа не работает, обновите версию!
begin
Writeln(ReadSeqInteger(ReadlnInteger).Where(t->t mod 4=0).Max)
end.
Пример
10
-8 6 12 0 -8 19 -5 2 12 -40
12
// Внимание! Если программа не работает, обновите версию!
begin
Writeln(ReadSeqInteger(ReadlnInteger).Where(t->t mod 4=0).Max)
end.
Пример
10
-8 6 12 0 -8 19 -5 2 12 -40
12
Приложения:

Ответ дал:
0
А var где
Ответ дал:
0
Программа работающая. В Вашем условии разве требуется непременно писать var? ))
Ответ дал:
0
Разве не надо писать var
Ответ дал:
0
"- Василий Иванович, ракеты привезли!
- Ракеты - это отлично, Петька! А седла привезли к ним?
- Зачем к ракетам седла?
- Не знаю, но седла должны быть, как же без них?
- Ну и дуб же ты, Василий Иванович!
- Да, Петька, здоровый я мужик!"
- Ракеты - это отлично, Петька! А седла привезли к ним?
- Зачем к ракетам седла?
- Не знаю, но седла должны быть, как же без них?
- Ну и дуб же ты, Василий Иванович!
- Да, Петька, здоровый я мужик!"
Ответ дал:
0
Вам программу написали, пример привели, скриншот дали, где видно, что все работает - а Вы все про var твердите...
Похожие вопросы
2 года назад
2 года назад
8 лет назад
9 лет назад