Вопрос задан 14.07.2023 в 12:46. Предмет Информатика. Спрашивает Степанова Диана.

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

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

Ответы на вопрос

Внимание! Ответы на вопросы дают живые люди. Они могут содержать ошибочную информацию, заблуждения, а также ответы могут быть сгенерированы нейросетями. Будьте внимательны. Если вы уверены, что ответ неверный, нажмите кнопку "Пожаловаться" под ответом.
Отвечает Вотченков Влад.

Program n1;

var a,k,n,i: integer;

begin

readln(n);

k:=0;

for i:=1 to n do begin

readln(a);

if a mod 10=6 then k:=k+1;

end;

write(k);

end.

0 0
Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.

Привет! Вот пример программы на языке Python, которая решает данную задачу:

python
def count_numbers(n, sequence): count = 0 for num in sequence: if num % 2 == 0 and num % 10 == 6: count += 1 return count n = int(input("Введите количество чисел: ")) sequence = [] print("Введите числа:") for _ in range(n): num = int(input()) sequence.append(num) result = count_numbers(n, sequence) print("Количество чисел, кратных 2 и оканчивающихся на 6:", result)

Программа сначала запрашивает количество чисел в последовательности (n), а затем просит ввести сами числа по одному. Введенные числа сохраняются в список sequence.

Функция count_numbers принимает количество чисел n и саму последовательность sequence. Она проходит по каждому числу в последовательности и проверяет, является ли число кратным 2 и оканчивающимся на 6. Если это условие выполняется, счетчик count увеличивается на 1.

В конце программа выводит количество чисел, удовлетворяющих заданным условиям.

0 0

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

Топ вопросов за вчера в категории Информатика

Последние заданные вопросы в категории Информатика

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