👤
Invector
a fost răspuns

sa elaborez un subprogram procedura care calculeaza aria si perimetrul unui dreptunghi in Pascal. urgent

Răspuns :

procedure ap(lu,la:real; var A,P:real);
begin
A:=lu*la;
P:=2*(lu+la);
end;