viết chương trình in ra màn hình diện tích và chu vi hình chữ nhật.

1 câu trả lời

Program BTT;
Uses crt;
Var a,b,p,s: extended;
Begin
        Clrscr;
        Write('Nhap chieu dai va chieu rong: '); Readln(a,b);
        p:=(a+b)*2;
        s:=a*b;
        Writeln('Chu vi la: ',p:0:2);
        Write('Dien tich la: ',s:0:2);
        Readln
End.