Viết chương trình tính chu vi và diện tích của hình chữ nhật có chiều dài hai cạnh là a, b (được nhập từ bàn phím).
2 câu trả lời
uses crt;
var a, b, cv, s : integer;
begin
clrscr;
write('nhap chieu dai va chieu rong : ');readln(a, b);
cv := (a + b) * 2;
s := a * b;
writeln('chu vi = ', cv);
writeln('dien tich = ', s);
readln
end.
uses crt;
var a,b,chuvi,dientich:real;
Begin
clrscr;
Write('Nhap a va b=');Readln(a,b);
chuvi:=(a+b)*2;
dientich:=a*b;
Write('Dien tich hinh chu nhat la=',dientich:5:2);
Readln;
Write('Chu vi hinh chu nhat la=',chuvi:5:2);
Readln
end.