Question

DAU COROANĂ!!!
1)Se dau 4 numere care reprezintă laturile unui dreptunghi.Să se afle aria și perimetrul.
2)Se dă un program ce citește 3 numere și ele se afișează în ordine crescătoare.Determinați cifrele.

Answer 1

1)
program p1;
var perimetru,aria,lungimea,latimea:integer;
begin
writeln('dati lungimea si latimea'); readln(lungimea,latimea);
perimetru:=(lungimea+latimea)*2;
aria:=lungimea*latimea;
writeln('perimetrul este:  ',perimetru);
writeln('aria este:  ',aria);
end.