Нужно написать программы в Кумире:
Задача 1 (из классной работы)
Дан массив, содержащий 70 неотрицательных целых чисел, не превышающих 1000. Опишите на одном из языков программирования алгоритм, позволяющий найти и вывести наибольшую сумму двух соседних элементов массива, имеющих различную чётность. Гарантируется, что в массиве есть соседние элементы, имеющие различную чётность.
Задача 2.
В некотором населённом пункте N домов (с номерами от 1 до N). Известно, сколько людей проживает в каждом из домов.
А) Составьте программу, которая подсчитывает количество жителей в домах, имеющих чётный номер.
Б) Составьте программу, которая подсчитывает количество домов, в которых живёт нечётное количество жителей.
Для решения задачи использовать одномерный массив из N чисел, в котором элементы массива – это количество жильцов дома. Элементы массива задаются с клавиатуры. Задачи А и Б можно объединить в одну программу.
Задача 3.
Условия задачи объявлены также как в задаче 2. Составьте программу, которая подсчитает количество домов, в которых проживает максимальное количество жителей.
Ответы на вопрос
Задача 1. Наибольшая сумма двух соседних элементов разной чётности
алг
нач
цел таб a[1:70]
цел i, max
нц для i от 1 до 70
ввод a[i]
кц
max := -1
нц для i от 1 до 69
если mod(a[i], 2) <> mod(a[i + 1], 2) то
если a[i] + a[i + 1] > max то
max := a[i] + a[i + 1]
все
все
кц
вывод max
кон
Задача 2. Чётные номера домов и нечётное число жителей
алг
нач
цел N, i, s, k
ввод N
цел таб a[1:N]
s := 0
k := 0
нц для i от 1 до N
ввод a[i]
если mod(i, 2) = 0 то
s := s + a[i]
все
если mod(a[i], 2) = 1 то
k := k + 1
все
кц
вывод s
вывод k
кон
Здесь \(s\) — количество жителей в домах с чётными номерами, а \(k\) — количество домов, где живёт нечётное число людей.
Задача 3. Количество домов с максимальным числом жителей
алг
нач
цел N, i, max, k
ввод N
цел таб a[1:N]
нц для i от 1 до N
ввод a[i]
кц
max := a[1]
нц для i от 2 до N
если a[i] > max то
max := a[i]
все
кц
k := 0
нц для i от 1 до N
если a[i] = max то
k := k + 1
все
кц
вывод k
кон
Похожие вопросы
Топ вопросов за вчера в категории Информатика
Последние заданные вопросы в категории Информатика
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili

