Информатика | 5 - 9 классы
Напишите программу, которая в последовательности целых чисел определяет их сумму и количество четных чисел, кратных 5.
Программа получает на вход целые числа, количество введенных чисел неизвестно, последовательность чисел заканчивается число 0(0 - признак окончания ввода, не входит в последовательность СРОЧНО, ПОЖАЛУЙСТА, НА ПАСКАЛЕ.
ОЧЕНЬ СРОЧНО.
Программа получает на вход натуральные числа, количество введенных чисел неизвестно, последовательность чисел заканчивается нулем?
Программа получает на вход натуральные числа, количество введенных чисел неизвестно, последовательность чисел заканчивается нулем.
(a = 0 признак окончания ввода , ноль не входит в последовательность).
Программа должна вывести количество и сумму всех чисел последовательности.
Напишите программу, которая в последовательности целых чисел определяет их сумму и количество четных чисел, кратных 5?
Напишите программу, которая в последовательности целых чисел определяет их сумму и количество четных чисел, кратных 5.
Программа получает на вход целые числа, количество введенных чисел неизвестно, последовательность чисел заканчивается число 0(0 - признак окончания ввода, не входит в последовательность СРОЧНО, ПОЖАЛУЙСТА, НА ПАСКАЛЕ.
Напишите программу, которая в последовательности целых чисел определяет их сумму и количество четных чисел, кратных 5?
Напишите программу, которая в последовательности целых чисел определяет их сумму и количество четных чисел, кратных 5.
Программа получает на вход целые числа, количество введенных чисел неизвестно, последовательность чисел заканчивается число 0(0 - признак окончания ввода, не входит в последовательность
СРОЧНО, ПОЖАЛУЙСТА, НА ПАСКАЛЕ.
Напишите программу на языке Паскаль, которая в последовательности целых чисел определяет количество четных чисел кратных 3?
Напишите программу на языке Паскаль, которая в последовательности целых чисел определяет количество четных чисел кратных 3.
Программа получает на выход целые числа.
Количество введенных чисел неизвестно, последовательность чисел заканчивается числом 0 (0 - признак окончания ввода, не входит в последовательность ).
Количество чисел не превышает 20.
Введенные числа [ - 30 ; 30].
Программа должна вывести одно число : количество четных чисел, кратных 3.
Желательно с массивом в начале.
Буду признательна!
Напишите программу на языке Паскаль, которая в последовательности целых чисел определяет количество четных чисел кратных 3?
Напишите программу на языке Паскаль, которая в последовательности целых чисел определяет количество четных чисел кратных 3.
Программа получает на выход целые числа.
Количество введенных чисел неизвестно, последовательность чисел заканчивается числом 0 (0 - признак окончания ввода, не входит в последовательность ).
Количество чисел не превышает 20.
Введенные числа [ - 30 ; 30].
Программа должна вывести одно число : количество четных чисел, кратных 3.
Буду признательна!
Напишите программу, которая в последовательности целых чисел определяет их сумму и количество четных чисел, кратных 5?
Напишите программу, которая в последовательности целых чисел определяет их сумму и количество четных чисел, кратных 5.
Программа получает на вход целые числа, количество введенных чисел неизвестно, последователньость чисел заканчивается числом 0 (0 - признак окончания ввода, не входит в последовательность)
Количество чисел не превышает 1000.
Введенные числа по модулю не превышают 30 000.
Программа должна вывести два числа : сумму последовательности и количество четных чисел, кратных 5.
Пример работы программы :
Входные данные :
4
60
15
0
Выходные данные :
79
1.
Напишите программу которая в последовательности целых чисел определяет количество чисел кратных 6 или 11?
Напишите программу которая в последовательности целых чисел определяет количество чисел кратных 6 или 11.
Программа получает на вход целые числа, количество введенных чисел неизвестно, последовательность чисел заканчивается числом 0 (pascal).
Напишите программу, которая в последовательности целых чисел определяет их количество и сумму четных чисел?
Напишите программу, которая в последовательности целых чисел определяет их количество и сумму четных чисел.
Программа получает на вход целые числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 - признак окончания ввода, не входит в последовательность).
Количество чисел не превышает 1000.
Введённые числа по модулю не превышают 30000.
Программа должна вывести два числа : длину последовательности и сумму чётных чисел.
Помогите, пожалуйста?
Помогите, пожалуйста!
Напишите программу, которая в последовательности натуральных чисел определяет количество трёхзначных чисел, кратных 4.
Программа получает на вход натуральные числа, количество введённых чисел неизвестно, последовательность чисел заканчивается 0 (0 - признак окончания ввода, не входит в последовательность).
Напишите программу, которая в последовательности целых чисел определяет количество четных чисел, кратных 3?
Напишите программу, которая в последовательности целых чисел определяет количество четных чисел, кратных 3.
Программа получает на вход целые числа.
Количество введенных чисел неизвестно, последовательность чисел заканчивается числом 0 (0 - признак окончания ввода, не входит в последовательность).
Количество чисел не превышает 1000.
Введенные числа по модулю не превышают 30000.
Программа должна вывести одно число : количество четных чисел, кратных 3.
На этой странице находится ответ на вопрос Напишите программу, которая в последовательности целых чисел определяет их сумму и количество четных чисел, кратных 5?, из категории Информатика, соответствующий программе для 5 - 9 классов. Чтобы посмотреть другие ответы воспользуйтесь «умным поиском»: с помощью ключевых слов подберите похожие вопросы и ответы в категории Информатика. Ответ, полностью соответствующий критериям вашего поиска, можно найти с помощью простого интерфейса: нажмите кнопку вверху страницы и сформулируйте вопрос иначе. Обратите внимание на варианты ответов других пользователей, которые можно не только просмотреть, но и прокомментировать.
Program mas ;
var i, k, sum : integer ; a : array [1.
1000] of integer ;
begin
for i : = 1 to 1000 do
begin ;
readln(a[i]) ;
if a[i] = 0 then break ;
end ;
k : = 0 ;
sum : = 0 ;
for i : = 1 to 1000 do
begin ;
sum : = sum + a[i] ;
if (a[i] mod 2 = 0) and (a[i] mod 5 = 0) and (a[i]0) then
k : = k + 1 ;
end ;
writeln('summa = ', sum) ;
writeln('kolichestvo = ', k) ;
readln ;
end.