END SUB

Формальные параметры делятся на 2 группы:

1. Предназначенные для получения значений из головного модуля – параметры значений.

2. Предназначенные для присвоения результатов, полученных в подпрограмме – параметры результата.

Место процедуры – подпрограммы SUB – после головной программы.

Запуск процедуры SUB осуществляется из головной программы оператором CALL

CALL имя подпрограммы (факт. параметр [, ф.п....])

Обмен данными между головным модулем и подпрограммой, как и в FUNCTION осуществляется 2 способами.

Ввод программы, в тексте которой находится обращение к подпрограмме, также выполняется в 2 этапа.

Фактические и формальные параметры должны совпадать по количеству и типу.

Если в качестве формального параметра фигурирует массив, то в качестве фактического параметра указывается имя массива с открывающей и закрывающей скобками.

Например CALL W(A(), M(), X)

После выполнения подпрограммы SUB управление передается оператору, следующему за оператором – вызовом подпрограммы CALL

Пример: вычислить , где a_i, b_m, c_n – массивы

REM применение подпрограммы–процедуры пользователя

DIM SHARED Z, SA, SB, SC, I, M, N, P, H, T, S, F

INPUT P, H, T

CALL SUM(P, S)

CALL SUM(H, S)

SB=S

CALL SUM(T, S)

SC=S

END

SUB SUM(F, S)

S=0

FOR R=0 TO F

INPUT D(R)

S=S+D(R)

END SUB