Напишите программку, которая в последовательности натуральныхчисел определяет наибольшее

Question

Напишите программку, которая в последовательности натуральныхчисел определяет наибольшее

Напишите программу, которая в последовательности естественных
чисел определяет наибольшее число, кратное 5. Программа
получает на вход количество чисел в последовательности, а затем сами
числа. В последовательности всегда имеется число, кратное 5.
Количество чисел не превышает 1000. Введённые числа не превосходят
30 000.
Программка должна вывести одно число наибольшее число, кратное 5.

Pascal

Задать свой вопрос

Виктор
Информатика
2019-02-02 17:19:47
0
1

1 ответ

, оставишь ответ?

Имя:*

E-Mail:

Похожие вопросы

решите уравнение 2sin(П/3-x)=1

Помогите, завтра тест, надобно сделать!

(Не) слышно гула городского; (не) способен на подлость; (не) увлекающийся в

Помогите пожалуйста очень срочно надо

Назовите понятия, общее для приведенных ниже групп слов:А) рабы, капиталисты, феодалы;Б)

Преобразуйте в многочлен выражение (а-b)(a+b)

Переведите на английский:РОБИН - БОББИН Робин-бобин Кое - как Подкрепился на тощак: Съел

В бочке было 90 литров воды.поначалу в бочку долили 1/3 того

Орнитологи проводят изучение жизни птичьих сообществ. Какой вид деятельности иллюстрируется

Два проводника противодействием R1 = 100 Ом и R2 = 100

Алла · Answer 1 · 2019-02-02 17:29:22+3:00

uses crt;
var a:array[1..1000] of integer;
i,max,n:integer;
begin
clrscr;
write('nlt;1000, n=');
read(n);
write('a[i]lt;30000, a[i]:');
for i:=1 to n do
begin
readln(a[i]);
max:=0;
if(a[i] mod 5=0) and (a[i]gt;max)
then max:=a[i];
end;
writeln('max=',max);
end.

О проекте

Напишите программку, которая в последовательности натуральныхчисел определяет наибольшее

Добро пожаловать!