program hinh_chu_nhat;
uses crt;
var a, b, S, P: real;
begin
clrscr;
writeln('Nhap chieu dai hcn la:'); readln(a);
writeln('Nhap chieu rong hcn la:'); readln(b);
P:=(a+b)*2;
S:=(a*b);
writeln('Chu vi hcn la:',P:4:2);
writeln('Dien tich hcn la:',S:4:2);
readln
end.