pues el problema consiste en que hago un procedure, y lo cierro y en un procedimiento posterior necesito llamar a ese procedimiento y me da un error, dice que el identificador no está definido o algo así.
...
procedure Ecuaciondelarecta (var a,b:real);
var
z,k:real;
begin
z:=(v2-u2)/(v1-u1);
readln (a);
k:=u2-u1a;
readln(b);
writeln('Tu ecuacion de la recta es:y=',a,'x+',b);
end;
procedure Perpendiculardelarecta (var c,d:real);
var
cv,cd,a:real;
begin
cv:=-1/Ecuacuacinondelarecta(a);
readln(c);
cd:=w1/a+w2;
readln(d);
writeln('La perpendicular es:y=',c,'x+',d);
end;
...
como sería? gracias de antemano