Цитата:
Сообщение от ipost
P:=(rast(x1,y1)+rast(x2,y2)+rast(x3,y3))/2;
|
Нет, с процедурой так нельзя обращаться.
Можно, например, так:
В разделе описания переменных (Var) добавить, например
R1, R2, R3:Real;
Далее:
Rast(x1,y1,R1);
Rast(x2,y2,R2);
Rast(x3,y3,R3);
P:=R1+R2+R3;
Вот так.