Напишите программу, которая в последоваnельности натуральных чисел определяет максимальное число, кратное 5. программа получает на вход количество чисел в последовательности, а затем сами числа.в последовательности всегда имеется число, кратное 5. ко личе ство чисел не пре вы ша ет 1000. введённые числа не пре вы ша ют 30 000. пграмма должна вывести одно число — максимальное число, кратное 5.
Kymir1
1
27.08.2019 06:20
1
Другие вопросы по теме Информатика
7lavz
23.05.2020 20:42
ЮЮПР
31.03.2020 16:08
Яяяяя11111111
06.10.2019 00:40
Марямчик
06.10.2019 00:40
лорею
10.04.2020 17:58
филосов00
10.04.2020 17:58
kristinka140320
10.04.2020 17:58
katkovakatsluЛпл
10.04.2020 17:58
Алісія
10.04.2020 17:58
LavaGuy111
10.04.2020 17:58
Популярные вопросы
- Выражение (12a^3-6a^2b): 6a^2 и найдите его значение при a=5 и b=-4...
3 - Какие реки и озера украины в охране...
3 - Какая фигура занимает большую площадь...
3 - 15 . вычислить. tg7/16π - tg3/16π дробная черта 1+tg7/16πtg3/16π...
2 - Найдите наименьшее значение выражения x2+y2-6x+4y+17...
2 - Определите молекулярную формулу насыщенного одноатомного спирта,...
2 - Іть будь ласка твір треба на тему весна у моєму місті...
3 - Прямоугольник разделён вертикальным и горизонтальным отрезками на...
2 - Девочка прочитала книгу за три дня. в первый день она прочитала...
3 - Найди значение выражений 18305: 7-2880: 18)×74-157930=...
2
Program kratnoe;
var N,i,a,max: integer;
begin
writeln('Введите количество чисел:'); Readln(N);
max:=0;
For i:=1 to N do
begin
write('Введите число:'); readln(a);
if a mod 5 = 0 then
if a>max then max:=a;
end;
writeln('ответ:',max);
end.