
Вопрос задан 17.04.2021 в 19:37.
Предмет Информатика.
Спрашивает Школин Артём.
Даны натуральное число n и последовательность целых чисел а1, а2,…,аn.. Определить количество
тех членов последовательности, которые нечетны . Найти сумму членов последовательности, кратных 11. Составить блок-схему алгоритма, написать программу.

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

Отвечает Мекебай Лейла.
var a:array[1..1000] of longint;
kol, s, i, n : longint;
begin
readln(n);
for i:=1 to n do read(a[i]);
s := 0;
kol := 0;
for i:=1 to n do
begin
if (a[i] mod 11 = 0) then s := s + a[i]; // summa elementov
if (a[i] mod 2 = 1) then kol := kol + a[i]; // kolichestvo nechetnyx
end;
writeln (kol, ' ', s);
end;
после // нужно удалить ... сорри, что нет блок схемы



Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.
Для решения этой задачи нужно:
- Создать переменную, которая будет хранить количество нечетных чисел в последовательности и инициализировать ее нулем.
- Создать переменную, которая будет хранить сумму чисел, кратных 11, и инициализировать ее нулем.
- С помощью цикла перебрать все элементы последовательности.
- Если элемент нечетный, то увеличить значение переменной, хранящей количество нечетных чисел.
- Если элемент кратен 11, то добавить его значение к переменной, хранящей сумму чисел, кратных 11.
- Вывести на экран количество нечетных чисел и сумму чисел, кратных 11.
Блок-схема алгоритма:
Программа на Python:
scssn = int(input("Введите количество чисел в последовательности: "))
seq = []
for i in range(n):
seq.append(int(input("Введите число: ")))
odd_count = 0
sum_mult_11 = 0
for num in seq:
if num % 2 != 0:
odd_count += 1
if num % 11 == 0:
sum_mult_11 += num
print("Количество нечетных чисел: ", odd_count)
print("Сумма чисел, кратных 11: ", sum_mult_11)
Пример работы программы:
yamlВведите количество чисел в последовательности: 5
Введите число: 10
Введите число: 7
Введите число: 23
Введите число: 44
Введите число: 55
Количество нечетных чисел: 2
Сумма чисел, кратных 11: 110


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

Информатика 562

Информатика 404

Информатика 31

Информатика 76

Информатика 16

Информатика 41

Информатика 31
Последние заданные вопросы в категории Информатика
Предметы
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili