Viết chương trình in ra màn hình chu vi, diện tích hình chữ nhật biết: chiều dài, chiều rộng là các số nguyên được nhập vào từ bàn phím.

program ct;
uses crt;
var a,b,cv,dt: Qword;
begin
    clrscr;

    writeln('Nhap chieu dai'); readln(a);

    writeln('Nhap chieu rong'); readln(b);

    cv:=(a+b)*2; dt:=a*b;

    writeln('Chu vi hinh chu nhat la: ',cv);

    writeln('Dien tich hinh chu nhat la: ',dt);
    
    readln;
end.
_______________________________________

#Duahauvn

#HocTot

#ThiTot

program DT_CV_HCN;

uses crt;

var a,b,S,P: byte;

begin

 clrscr;

 write('Nhap a=');readln(a);

 write('Nhap b=');readln(b);

 P:=(a+b)*2;

 S:=a*b;

  writeln('Chu vi hinh chu nhat la ',P);

  writeln('Dien tich hinh chu nhat la',S);

  realn

end.