Условие:
Лазарус (Free Pascal) Дан одномерный массив B (n=10) и целые числа d и b. Найти сумму и количество элементов массива кратных заданному числу d. Сформировать одномерный массив по правилу: четные элементты увеличить на число b, а число d вычесть из нечетных элементов. Вывести новый одномерный массив
Решение:
Ниже приведено пошаговое решение задачи на языке Pascal (Lazarus/Free Pascal). ────────────────────────────── 1. Анализ задачи Дан массив B размером n = 10, а также два целых числа: d и b. Необходимо: а) Найти сумму и количество элементов массива, которые кратны числу d. б) Сформировать новый массив по следующему правилу: – Если элемент чётный, то увеличить его на число b. – Если элемент нечётный, то из него вычесть число d. в) Вывести новый массив. ────────────────────────────── 2. Алгоритм решения 1. Ввести исходные данные: элементы массива B, значения d и b. 2. Инициализироват...
