ИСПОЛЬЗОВАНИЕ ПАРАМЕТРОВ-МАССИВОВ В ПОДПРОГРАММАХ

Значимым различием объявления переменных в перечне формальных характеристик подпрограммы от объявления их в разделе описания переменных будет то, что типом хоть какого параметра в перечне формальных характеристик может быть только стандартный либо ранее объявленный тип. Потому нельзя объявлять последующую функцию:

PROCEDURE S ( A : ARRAY [1..10] OF REAL );

так, как в перечне формальных ИСПОЛЬЗОВАНИЕ ПАРАМЕТРОВ-МАССИВОВ В ПОДПРОГРАММАХ характеристик практически объявляется тип-диапазон, указывающий границы индексов массива.

Если в подпрограмме передается массив, то нужно сначало обрисовать его тип:

TYPE AT = ARRAY [1..10] OF REAL;

PROCEDURE S ( A : AT );

Разглядим пример, который соответствует пт 4 домашнего задания.

Пример 8. Задать три последовательности случайных чисел , , , где , , . Все числа последовательности кратные 2 помножить на , числа ИСПОЛЬЗОВАНИЕ ПАРАМЕТРОВ-МАССИВОВ В ПОДПРОГРАММАХ кратные 3 помножить на , числа кратные 5 помножить на .

На экран вывести данные и перевоплощенные последовательности , , .

PROGRAM PR8;

TYPE Mas=ARRAY [1..12] OF REAL;

VAR N, M, L : Mas;

i : BYTE;

A, B, C : REAL;

PROCEDURE ZAD (t : BYTE; VAR Mt : Mas);

BEGIN

RANDOMIZE;

FOR i:=1 TO t DO

Mt[i]:=RANDOM (20);

END;

PROCEDURE ИСПОЛЬЗОВАНИЕ ПАРАМЕТРОВ-МАССИВОВ В ПОДПРОГРАММАХ VIVOD (t : BYTE; Mt : Mas);

BEGIN

FOR i:=1 TO t DO

WRITE (Mt[i]:5:0);

WRITELN;

END;

PROCEDURE PREOB (t, p : BYTE; s : REAL; VAR Mt : Mas);

BEGIN

FOR i:=1 TO t DO

IF TRUNC(Mt[i]) MOD p=0 THEN Mt[i]:=s*Mt[i];

END;

BEGIN

WRITELN ('задать значения A, B, C ИСПОЛЬЗОВАНИЕ ПАРАМЕТРОВ-МАССИВОВ В ПОДПРОГРАММАХ ');

READ (A, B, C);

ZAD (12, N);

WRITELN ('начальная послед. N ');

VIVOD (12, N);

PREOB (12, 2, A, N);

WRITELN ('перевоплощенная послед. N ');

VIVOD (12, N);

ZAD (10, M);

WRITELN ('начальная послед. M ');

VIVOD (10, M);

PREOB (10, 3, B, M);

WRITELN ('перевоплощенная послед. M ');

VIVOD (10, M);

ZAD (8, L);

WRITELN ('начальная послед. L ');

VIVOD (8, L);

PREOB (8, 5, C, L);

WRITELN ИСПОЛЬЗОВАНИЕ ПАРАМЕТРОВ-МАССИВОВ В ПОДПРОГРАММАХ ('перевоплощенная послед. L ');

VIVOD (8, L);

END.

В итоге выполнения программки на экран будет выведено:

задать значения , , .

2 3 4

начальная послед.

3 12 6 9 4 0 13 17 14 10 7 8

перевоплощенная послед.

3 24 12 9 8 0 13 17 28 20 7 16

начальная послед.

5 10 9 6 3 11 12 7 15 8

перевоплощенная послед.

5 10 27 18 9 11 36 7 45 8

начальная послед.

9 11 5 7 2 13 15 18

перевоплощенная послед.

9 11 20 7 2 13 60 18

Пояснения к программке: В данной программке задается тип Mas, который соответствует массиву 12 чисел типа REAL. Это изготовлено для того, чтоб использовать ИСПОЛЬЗОВАНИЕ ПАРАМЕТРОВ-МАССИВОВ В ПОДПРОГРАММАХ этот тип в качестве формальных характеристик при описании процедур. Так как наибольшее количество частей в последовательностях , , равно 12, то и тип Mas содержит 12 частей.

Процедура ZAD употребляется для получения последовательности случайных чисел, которые заносятся в массив Mt. Применяемая стандартная процедура RANDOMIZE инициализирует датчик псевдослучайных чисел, а при помощи стандартной функции ИСПОЛЬЗОВАНИЕ ПАРАМЕТРОВ-МАССИВОВ В ПОДПРОГРАММАХ RANDOM образуются случайные числа в спектре 0-20. Формальными параметрами процедуры ZAD являются: – количество частей в последовательностях; Mt – имя массива, в который заносятся элементы последовательностей.

Процедура VIVOD производит вывод в строчку – частей массива Mt. Формальные характеристики процедуры VIVOD подобны формальным характеристикам процедуры ZAD.

Процедура PREOB производит преобразование – частей массива ИСПОЛЬЗОВАНИЕ ПАРАМЕТРОВ-МАССИВОВ В ПОДПРОГРАММАХ Mt по последующему правилу: те элементы массива Mt, которые кратны значению множатся на значение . Кратность частей массива Mt проверяется при помощи операции MOD, которая позволяет получить остаток от целочисленного деления элемента Mt[i] на число . Если этот остаток равен 0, то элемент Mt[i] кратен числу .

В процессе выполнения самой программки поначалу ИСПОЛЬЗОВАНИЕ ПАРАМЕТРОВ-МАССИВОВ В ПОДПРОГРАММАХ задаются значения , , . В итоге выполнения процедуры ZAD получаем последовательность случайных чисел , . При помощи процедуры VIVOD эта последовательность выводится на экран. Процедура PREOB производит преобразование последовательности по данному правилу. Процедура VIVOD выводит уже перевоплощенную последовательность на экран. Подобные деяния производятся для последовательностей и . В итоге выполнения программки на ИСПОЛЬЗОВАНИЕ ПАРАМЕТРОВ-МАССИВОВ В ПОДПРОГРАММАХ дисплее будут значения , , и 6 последовательностей чисел.

Перечень ЛИТЕРАТУРЫ

1. Фаронов В.В. Программирование на индивидуальных ЭВМ в среде Турбо-Паскаль. – М.: Изд-во МГТУ, 1990. –580 с.

2. Белецкий Я. Турбо Паскаль с графикой для индивидуальных компов / Пер. с польск. Д.И. Юренкова. – М.: Машиностроение, 1991. –320 с.


ЗАДАНИЕ

1. Обрисовать функцию для определения (вид функции для каждого ИСПОЛЬЗОВАНИЕ ПАРАМЕТРОВ-МАССИВОВ В ПОДПРОГРАММАХ варианта задания приведен в столбце 2 таблицы).

2. Задать определенные значения , и вычислить и (формулы для определения и приведены в столбце 2 таблицы).

3. Обрисовать рекурсивные функции для определения , . Задать значение и вычислить (формулы для определения рекурсивных функций и для определения с приведены в столбце 3 таблицы).

4. Задать три последовательности случайных чисел , , и произвести деяния ИСПОЛЬЗОВАНИЕ ПАРАМЕТРОВ-МАССИВОВ В ПОДПРОГРАММАХ над каждым элементом этих последовательностей, используя функцию (количество частей последовательностей , , и надлежащие деяния для каждого варианта задания приведены в столбце 4 таблицы).

На экран вывести: значения переменных , , , данные и перевоплощенные последовательности , , (каждую последовательность чисел вывести в одну строчку).

Вид функции . Задать , . Вычислить , . Вид функций , . Задать . Вычислить . Значения , , . Произвести деяния ИСПОЛЬЗОВАНИЕ ПАРАМЕТРОВ-МАССИВОВ В ПОДПРОГРАММАХ над элементами последовательностей.
; ; ; ; ; ; ; ; все числа помножить на ; все числа помножить на ; все числа помножить на
; ; ; ; ; ; ; ; все четные помножить на ; все четные помножить на ; все четные помножить на
; ; ; ; ; ; ; ; ; ; числа кратные 3 помножить на ; числа кратные 5 помножить на ; числа кратные 2 помножить на
; ; ; ; ; ; ; ; все нечетные помножить на ; все нечетные помножить на ; все нечетные помножить ИСПОЛЬЗОВАНИЕ ПАРАМЕТРОВ-МАССИВОВ В ПОДПРОГРАММАХ на
; ; ; ; ; ; ; ; числа кратные 3 помножить на ; числа кратные 3 помножить на ; числа кратные 3 помножить на
; ; ; ; ; ; ; ; положительные: помножить на ; помножить на ; помножить на
; ; ; ; ; ; ; ; числа больше 10: помножить на ; помножить на ; помножить на
; ; ; ; ; ; ; ; ; числа меньше 12: помножить на ; помножить на ; помножить на
; ; ; ; ; ; ; ; положительные числа: поделить на ; поделить на ; поделить на
; ; ; ; ; ; ; ; четные числа , , поменять нулем
; ; ; ; ; ; ; ; отрицательные ИСПОЛЬЗОВАНИЕ ПАРАМЕТРОВ-МАССИВОВ В ПОДПРОГРАММАХ числа: помножить на ; помножить на ; поменять нулем
; ; ; ; ; ; ; ; числа кратные 2 поделить на ; числа кратные 5 поделить на ; числа кратные 3 поделить на
; ; ; ; ; ; ; все нечетные поделить на ; все нечетные поделить на ; все нечетные поделить на
; ; ; ; ; ; ; ; числа больше 15: помножить на ; поделить на 10; помножить на
; ; ; ; ; ; ; ; ; числа кратные 5 поделить на ; числа кратные 5 поделить на ; числа кратные ИСПОЛЬЗОВАНИЕ ПАРАМЕТРОВ-МАССИВОВ В ПОДПРОГРАММАХ 5 поделить на
; ; ; ; ; ; ; ; все четные помножить на ; все четные помножить на ; все четные помножить на
; ; ; ; ; ; ; ; кратные 3 помножить на ; кратные 5 помножить на ; кратные 2 помножить на
; ; ; ; ; ; ; ; числа кратные 5 поделить на ; числа кратные 5 поделить на ; числа кратные 5 поделить на
; ; ; ; ; ; ; числа больше 10: помножить на ; помножить на 10; помножить на
; ; ; ; ; ; ; ; все числа помножить на ; все числа помножить на ИСПОЛЬЗОВАНИЕ ПАРАМЕТРОВ-МАССИВОВ В ПОДПРОГРАММАХ ; все числа помножить на
; ; ; ; ; ; ; ; все нечетные помножить на ; все нечетные помножить на ; все нечетные помножить на
; ; ; ; ; ; ; ; ; числа кратные 3 помножить на ; числа кратные 3 помножить на ; числа кратные 3 помножить на
; ; ; ; ; ; ; ; четные числа , , поменять нулем
; ; ; ; ; ; ; ; числа меньше 12: помножить на ; помножить на ; помножить на
; ; ; ; ; ; ; ; все нечетные поделить на ; все нечетные поделить ИСПОЛЬЗОВАНИЕ ПАРАМЕТРОВ-МАССИВОВ В ПОДПРОГРАММАХ на ; все нечетные поделить на
; ; ; ; ; ; ; ; ; числа больше 15: помножить на ; поделить на 10; помножить на
; ; ; ; ; ; ; ; числа кратные 2 поделить на ; числа кратные 5 поделить на ; числа кратные 3 поделить на
; ; ; ; ; ; ; ; положительные числа: помножить на ; помножить на ; помножить на

СОДЕРЖАНИЕ

ВВЕДЕНИЕ. 3

1. ПРОЦЕДУРЫ И ФУНКЦИИ.. 3

2. ОПИСАНИЕ ФУНКЦИИ Данного ВИДА.. 8

3. РЕКУРСИЯ.. 9

4. Внедрение ПАРАМЕТРОВ-МАССИВОВ В ПОДПРОГРАММАХ 10

Перечень ЛИТЕРАТУРЫ.. 14

ЗАДАНИЕ ИСПОЛЬЗОВАНИЕ ПАРАМЕТРОВ-МАССИВОВ В ПОДПРОГРАММАХ. 15


ispolzovanie-metodov-akademicheskoj-psihologii.html
ispolzovanie-metodov-i-tehnologii-kriticheskogo-mishleniya-na-urokah-anglijskogo-yazika.html
ispolzovanie-metodov-socializacii-na-urokah-fiziki.html