Информатики плиз помогите.Решите задачу через паскаль

Приложения:

Ответы

Ответ дал: Аноним
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

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