var
S,P, a,b:integer;
begin
read(a);
read (b);
P:=(a+b)*2;
write('Периметр:',P); end;
S:=a*b; write('Площадь:',S); end;
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
var
S,P, a,b:integer;
begin
read(a);
read (b);
begin
P:=(a+b)*2;
write('Периметр:',P); end;
begin
S:=a*b; write('Площадь:',S); end;
end.