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

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

5-9 класс

10,14,50,25,17,0

Выходные: 2

Mkhadzharov 01 мая 2014 г., 2:11:59 (9 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Finka9
01 мая 2014 г., 4:52:41 (9 лет назад)

ой да, что может быть проще!)))
напишу сам цикл и условие. кстати допиши, как задается последовательность - рандомно или с клавы, думаю последовательность лучше задать как массив. проще будет)))
ниже условие проверки кратности и четности чисел. проверь обязательно, могу ошибится))

begin
clrscr;
For i:= 1 to (кол-во чисел) do
begin
If (a mod 2 = 0) and (a mod 7 = 0) then
k:=k+1;
end;

вроде вот и все))

+ 0 -
Warrior
01 мая 2014 г., 7:36:23 (9 лет назад)

var
a: array[1..9999] of integer;
i,n,b: integer;
begin
write('Кол-во чисел: '); readln(n);
for i:=1 to n do
begin
write(i, ' число = ');
readln(a[i]);
if (a[i] mod 2 = 0) and (a[i] mod 5 = 0) then inc(b);
end;
writeln('Кол-во четных чисел, кратных 5: ', b);
end.

Ответить

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

1. Скорость передачи данных через аналоговый модем равна 512 000 бит/с. Через данное соединение передают файл размером 425 килобайт. Определите время

передачи файла в секундах.
2. Сколько секунд потребуется модему, передающему сообщения со скоростью 28 800 бит/с, чтобы передать 100 страниц текста в 30 строк по 60 символов каждая, при условии, что каждый символ кодируется 1 байтом?

Спортсмен-лыжник пробежал в первый день K км. Каждый последующий день он увеличивал длину пробега на P процентов от пробега первого дня. Узнать

после какого дня суммарный пробег лыжника будет больше чем N км. Решить на Паскале.
K, P, N вводятся с клавиатуры

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

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

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

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

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

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

Пожалуйста помогите решить задачу: Напишите программу, которая в последовательности натуральных чисел определяет сумму всех чисел, кратных 6 и

оканчивающихся на 4. Программа получает на вход натуральные числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 – признак окончания ввода, не входит в последовательность). Количество чисел не превышает 1000. Введённые числа не превышают 30 000. Программа должна вывести одно число: сумму всех чисел, кратных 6 и оканчивающихся на 4.

Пример работы программы:

Входные данные Выходные данные

14 168

24

144

22

12

0

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

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

2)Найти среднее арифметическое всех целых чисел от a до 200 (значения a и b вводятся с клавиатуры; a>=200);

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

вход натуральные числа через клавиатуру, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 – признак окончания ввода, не входит в последовательность). Количество чисел не превышает 1000. Введённые числа не превышают 30 000. Программа должна вывести одно число: сумму всех чисел, кратных 6 и оканчивающихся на 4. Пояснение: цикл while x<>0 do с условием if (x mod 6=0) and (x mod 10=4)



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