Turbo Pascal 27

Организация циклов и работа с одномерными массивами

1. Задав одномерный массив целочисленных данных А в одном из заданных форматов (Byte, Word, Shortint, Integer или Longint), реализовать обработку массива, как указано в варианте. Длина массива N <= 20. Исходные данные задать самостоятельно, учитывая формат элементов массива A. Исходные данные должны вводиться с проверкой на область допустимых значений. Тип результата определяется из контекста задачи.

Integer. Найти сумму квадратов всех положительных элементов массива A={a[i]}.

Строковый тип

2. Используя процедуры и функции обработки строк, произвести необходимые операции над строками.

Дана строка S. Подсчитать в ней количество пробелов.

Подпрограммы и обработка матриц

3. Задав двумерный массив вещественных данных (матрицу А), реализовать его обработку, как указано в варианте. Исходные данные задать самостоятельно, учитывая специфику задачи. В программе должны быть предусмотрены процедуры ввода-вывода элементов массива А и его обработки.

Задана квадратная матрица A размером n^xn (n≤10), состоящая из действительных элементов. Найти сумму всех ее положительных и произведение всех ее отрицательных элементов.