Un lot de pamant de forma dreptunghilara trebuie ingradit cu un gard. De scris un program Pascal care va calcula citi metri de gard va fi nevoie pentru a ingradi acest lot. Lungimea si latimea locului se citesc de la tastatura. Sa se calculeze si suprafara locului

Răspuns :

var a,b,perimetru,arie:integer;
begin
    write ('Type a: '); 
            readln (a);
    write ('Type b: ');
            readln (b);
    perimetru :=2*a+2*b;
    aria:=a*b;
    writeln ('Avem nevoie de  ', perimetru,' metrii');
    writeln ('Suprafata terenului este de ' ,aria ,'metrii patrati ');
  end.