Nhập vào chiều dài và chiều rộng của hình chữ nhật từ bàn phím. Sau đó in ra màn hình diện tích và chu vi hình chữ nhật đó. Lưu ý làm tròn đến hai chữ số thập phân đối với chu vi và diện tích.
Nhập vào chiều dài và chiều rộng của hình chữ nhật từ bàn phím. Sau đó in ra màn hình diện tích và chu vi hình chữ nhật đó. Lưu ý làm tròn đến hai chữ số thập phân đối với chu vi và diện tích.
program Tin_hoc;
uses crt;
var cd,cr,cv,dt:real;
begin
clrscr;
write(‘Chieu dai = ‘);readln(cd);
write(‘Chieu rong = ‘);readln(cr);
cv:=(cd+cr)*2;
dt:=cd*cr;
writeln(‘Chu vi cua hinh chu nhat la: ‘,cv:0:2);
writeln(‘Dien tich cua hinh chu nhat la: ‘,dt:0:2);
readln;
end.
Program BTH;
uses crt;
var a,b:real;
BEgin
clrscr;
Write(‘Nhap chieu dai: ‘);readln(a);
Write(‘Nhap chieu rong: ‘);readln(b);
writeln(‘Chu vi hinh chu nhat la: ‘,(a+b)*2:4:2);
writeln(‘Dien tich hinh chu nhat la: ‘,a*b:4:2);
readln;
end.