Параметр-переменная и параметр-значение.Программист имеет дело с параметрами при описании и при использовании процедур и функций. Различают формальные и фактические параметры. Параметры, определяемые при описании процедуры или функции, называются формальными параметрами. Параметры, задаваемые при вызове процедуры или функции, называются фактическими параметрами. В описании формального параметра перед именем параметра может стоять слово var, показывающее, что параметр является параметром-переменной. Отличие параметра-переменной от обычного параметра (т. е. параметра-значения) состоит в том, что инструкции процедуры или функции могут изменить значение переменной, являющейся фактическим параметром. Использование параметров-переменных позволяет использовать процедуры для изменения значений переменных основной программы. В следующей программе для вычисления площади круга и длинны окружности по значению радиуса используется процедура программиста SqLeOkr. Пример использования процедуры программиста
program sqring; Var {переменные основной процедуры} r,l,s:real; {радиус, длинна окружности и площадь круга} {процедура программиста} procedure SqLeOkr (r:real; var s:real; var l:real); {r - радиус,s - площадь круга, l - длинна окружности } Const pi=3.14159; Begin s:=pi*r*r; l:=2*pi*r; end; {основная процедура} Begin Writeln (‘Вычисление длинны окружности и площади круга:’); Write (‘Задайте радиус и нажмите <Enter>’); Readln (‘r’); l:=0; s:=0; SqLeOkr (r,s,l); {переменные программы – фактические параметры процедуры} Writeln (‘Радиус окружности:’,r:6:3’); Writeln (‘Длина: ’, l:6:3, ’ Площадь: ‘, s:7:3); end.
|
