Обработка данных. Функции и процедуры. Локальные и глобальные переменные
Var x1,y1,x2,y2,x3,y3,s : Real;
Begin
Write('Координаты 1-ой точки'); ReadLn(x1,y1);
Write('Координаты 2-ой отчки'); ReadLn(x2,y2);
Write('Координаты 3-ей точки'); ReadLn(x3,y3);
Plo(x1,y1,x2,y2,x3,y3,s);
WriteLn('Площадь треугольника =',s :10:3); ReadLn;
End.
Одна и та же процедура может использоваться в разных программах. Для этого необязательно включать её текст в основную программу, существуют и другие механизмы её подключения.
Обязательные пояснения:
 | при формировании переменных, с которыми
будет работать процедура, следует
выполнять определённые правила, а именно:
| все переменные, общие для процедуры и
более высокой структуры, описываются в
заголовке процедуры, при этом:
| переменные, которые не изменяются в
процедуре и не требуют возврата в более
высокую структуру, описываются только
своим типом, совпадающим с типом в более
высокой структуре.
| переменные, которые в процедуре изменяются
и передаются в более высокую структуру в
изменённом виде, описывается после
заголовка Var.
| локальные переменные описываются
после заголовка программы по общим
стандартным правилам, изложенным ранее. | |
Например:
Procedure Forat(aif, beg: Real; jj, kit: Integer; Var ss: Real);
Var i1, j1: Byte;
В этой процедуре переменными, общими с основной программой являются переменные aif, beg, jj, kit, ss, однако лишь последняя после выполнения процедуры поступит в основную программу в изменённом виде.
Это общее правило относится не только к переменным, но и к массивам, множествам, любым другим структурам.
