Question

Cum sa scrii (in pascal) un program care sa calculeze perimetrul oricarui triungi (in pascal)?

Answer 1

Este similar cu problema precedenta cu aria unui triunghi, numai ca de aceasta data la functia de calcul a perimetrului, trebuie sa ai trei argumente: dimensiunile celor 3 laturi, si in program vei avea trei variabile pe care utilizatorul va trebui sa le introduca.

Program Per_Triunghi;

function perimetru_triunghi(l1,l2,l3:integer):integer;
begin
   perimetru_triunghi:=l1+l2+l3;
end;

var l1,l2,l3:integer;

Begin
writeln('Introduceti laturile triunghiului:');
readln(l1,l2,l3);
writeln('Perimetrul triunghiului este:',perimetru_triunghi(l1,l2,l3));
End.