Информатика. Часть 1. Мойзес О.Е - 97 стр.

UptoLike

ВУЗ: 

ТПУ | Томск

Составители: 

Рубрика: 

97
Обращение к функции из основной программы или другой
подпрограммы осуществляется непосредственно в выражении с
указанием имени функции со списком фактических параметров:
<Переменная>:=<имя функции>(список фактических параметров).
Порядок обращения к подпрограмме–функции следующий.
Если при компиляции программы встречается имя подпрограммы
(процедуры или функции), это имя отыскивается в описании.
В описании подпрограммы формальным параметрам
присваиваются соответствующие фактические. Формальные параметры
заменяются фактическими, после чего выполняется тело подпрограммы.
Результат выполнения функции присваивается имени функции и
передается в основную программу.
Следует
запомнить. Так как происходит замена формальных
параметров на фактическиие, то число, тип и порядок следования
формальных и фактических параметров должен обязательно совпадать.
Пример. Составить программу вычисления затрат тепла на
образование силикатов при варке стекла по выражению
∑
⋅⋅
n
1=i
j
/100 ) - (100 = QS
iij
PQB ,
где В
j
– массив значений стеклобоя, j = 1,2, … 5; Q
i
– удельный расход
тепла, i = 1,2, … 6; P
i
– концентрация реагентов в шихте, i = 1,2, … 6.
Program Teplo;
type mas1=array[1..5]of real;
mas2=array[1..6]of real;
var QS,B:mas1;
Q,P:mas2;
i,j:integer;
Function Sum(Q,P:mas2):real;
var i:integer;
s:real;
Begin
s:=0.0;
for i:=1 to 5 do
s:=s+Q[i]
∗P[i];
Sum:=s;
end;
{Основная программа}
Begin

Страницы