Лабораторная работа №3, Вариант 0, Семестр 1-й

Задание:

Задана последовательность значений элементов некоторого массива до и после преобразования по некоторому правилу. Определите алгоритм преобразования и напишите программу, которая:
1) формирует массив из заданного количества случайных целых чисел в заданном диапазоне и выводит элементы массива на экран;
2) по определенному вами алгоритму преобразовывает этот массив и выводит на экран элементы преобразованного массива.
3) производит заданные вычисления и выводит результат на экран.
Указания:
- преобразование массива оформить в виде процедуры;
- заданные вычисления оформить в виде функции;
- все выводы на экран осуществлять в основной программе.
Массив A = (15, 9, –6, 12, –9, 18, 0) преобразован к виду A = (5, 3, 0, 4, 0, 6, 0). Размер массива A - 20 элементов из диапазона [–25,25]. Вычислить сумму четных элементов преобразованного массива.

Зачет
TurboPascal
*на экран текст выводится на транслите, так как при выполнении
использовался оригинальный англоязычный TurboPascal
сдана в 2012