viết chương trình nhập vào 2 cạnh a,b của hình chữ nhật từ bàn phím , tính đặc điểm của hình chữ nhật đó và in kết quả ra màn hình
1 câu trả lời
var
a,b,s,p:integer;
begin
write('nhap chieu dai=');readln(a);
write('nhap chieu rong=');readln(b);
p:=((a+b)*2);
s:=a*b;
writeln('chi vi =',p);
writeln('dien tich=',s);
readln;
end.
Câu hỏi trong lớp
Xem thêm