Статистика
Всего в нашей базе более 4 327 663 вопросов и 6 445 978 ответов!

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

5-9 класс

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

Ninoshka1995 08 авг. 2014 г., 4:37:07 (9 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Yojne
08 авг. 2014 г., 6:49:42 (9 лет назад)

Program A3;constn=4;varO:array[1..n] of integer;a,b,c,i:integer;beginwriteln('Vvedi massiv');for i:=1 to n do beginreadln(o[i]);end;for i:=1 to n do beginif o[i] mod 5=0 then begin a:=o[i]; b:=1; end;end;if b=1 then beginfor i:=1 to n do beginif o[i] mod 5=0 then if o[i]>a then a:=o[i];end;end;writeln(a);end.

+ 0 -
Nastuhska
08 авг. 2014 г., 7:54:38 (9 лет назад)

Program A3;
const
n=4;
var
O:array[1..n] of integer;
a,b,c,i:integer;
begin
writeln('Vvedi massiv');
for i:=1 to n do begin
readln(o[i]);
end;
for i:=1 to n do begin
if o[i] mod 5=0 then begin a:=o[i]; b:=1; end;
end;
if b=1 then begin
for i:=1 to n do begin
if o[i] mod 5=0 then if o[i]>a then a:=o[i];
end;
end;
writeln(a);
end.

+ 0 -
Aysha2014love
08 авг. 2014 г., 9:48:27 (9 лет назад)

Если помог нажми "Спасибо"

Ответить

Другие вопросы из категории

Переведите выражения из линейной записи в общепринятую

а) a*b/c+d - .
б) a*b/c*d - .
в) a+b/с - .
г) (a+b)/с - .
д) a+b/c+d -..
е) (a+b)/(c+d) - .

Единичные имена дать множеству Мореплавателль уЧеный Композитор Писатель Сказочник Литературный герой

Информационный процесс

система счисления

единица информации

программное обеспечение

тесктовый процессор

Читайте также

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

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

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

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

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

количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется число, оканчивающееся на 3. Количество чисел не превышает 1000. Введённые числа не превышают 30 000. Программа должна вывести одно число – максимальное число, оканчивающееся на 3. Пример работы программы: Входные данные Выходные данные 3 23 13 23 3

1)Напишите программу,которая в последовательности целых чисел определяет количество трехзначных чисел,не кратных 5 и 7 и не заканчивающ

ихся 0 или 1.
Программа получает на вход целые числа от -3000 до 3000.

2)Напишите программу,которая в последовательности целых чисел вычисляет среднее арифметическое среди двухзначных чётных чисел,делящихся на 3.
НУЖНО СЕГОДНЯ! 66 БАЛЛОВ!

хееееееееелп ми!!!ПАСКАЛЬ, Напишите программу, которая в последовательности натуральных чисел определяет количество всех чисел, сумма единиц и десятков

кратна 3. Программа получает на вход натуральные числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 – признак окончания ввода, не входит в последовательность).



Вы находитесь на странице вопроса "Напишите программу, которая в последовательности натуральных чисел определяет максимальное число, кратное 5. Программа получает на вход количество чисел в", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.