Обработка одномерных массивов. Простые циклы
Добрый вечер всем.
Нуждаюсь в Вашей помощи с заданием. Ниже Вы можете видеть задание и условие:
Условие
1) Данная работа выполняется с использованием интегрированной среды разработки приложений Delphi 7.
2) Задание нужно выполнить в виде консольного (DOS) приложения.
Разработать программу и тестовый пример для проверки работы программы. В работе использовать статические массивы, задавая их размер 100. Значение n<100 (количество элементов массива) и сами элементы массива вводить с клавиатуры. Тип элементов массива – real, если в задании не указано, что массив целочисленный. Введенный массив необходимо вывести на экран в строку, используя соответствующий формат вывода. Если в результате выполнения задания изменился исходный массив, то результирующий массив тоже нужно вывести на экран. В качестве отчета отсылается папка с соответствующим проектом, тестовый пример приводить не нужно.
Задание
В заданном целочисленном массиве a1, a2, …, an подсчитать сумму и
произведение четных, положительных элементов. Если в массиве отсутствуют подобные элементы, то вывести на экран соответствующее сообщение.
|