Напишите программу, которая в последовательности натуральных чисел определяет максимальное четное число. программа получает на вход целые числа, количество введенных данных неизвестно, последовательность чисел заканчивается числом 0. на паскале
bpanraw
1
21.05.2019 09:00
1
Другие вопросы по теме Информатика
bogdan345710
06.10.2019 08:31
muradir1102
06.10.2019 08:31
daniilf02mail
06.10.2019 08:31
АннаЛітвін
06.10.2019 08:31
grigoryanoksan
19.05.2020 00:53
rusik20022002
17.05.2021 13:01
TOFeFE
17.05.2021 13:01
solnisko22
17.05.2021 13:00
animetan200
02.05.2020 21:39
Популярные вопросы
- Кчему приводит непонимание семьи ромео и джульетто и напишите...
2 - Спишите вставьте нужные слова. в описании предмета ,,данное...
3 - Какова будем массовая доля соли при смешивании 130 гр 10процент...
2 - Два поезда вышли из двух городов одновременно навстречу друг...
1 - Туристы сначала плыли на теплоходе по реке 2 ч, а затем шли...
2 - 1. два туриста одновременно отправились в путь в противоположных...
3 - Два катета прямоугольного треугольника равны 7 и 12 . найдите...
3 - Варифметической прогрессии сумма первых трех членов равна 9...
2 - Составить 5 предложений о весне ! 4 класс !...
2 - 340-50 .920-80 .120см.-70см. 340см.+60см. 380+90 150+70 640см.+80см....
2
var a,max:integer;
begin
max:=0;
a:=0;
read(a);
while a<>0 do
begin
if (a mod 2=0) and (a>=max) then max:=a;
read(a);
end;
write(max);
end.