Viết chương trình nhập 2 cạnh đáy, 2 cạnh bên và chiều cao của hình thang. In ra màn hình chu vi, diện tích của hình thang đó
Quảng cáo
1 câu trả lời 1549
Program b;
Uses crt;
Var a,b,c,d,h: integer;
Begin
Write('Nhap lan luot 2 day cua hinh thang:'); Readln(a,b);
Write('Nhap lan luot 2 canh ben cua hinh thang:'); Readln(c,d);
Write('Nhap chieu cao cua hinh thang:'); Readln(h);
Writeln('Chu vi cua hinh thang:', a+b+c+d);
Writeln('Dien tich hinh thang:', (a+b)/2*h:6:3);
Readln
End.
Quảng cáo
Bạn cần hỏi gì?
Câu hỏi hot cùng chủ đề
-
Hỏi từ APP VIETJACK
Đã trả lời bởi chuyên gia
45458 -
Hỏi từ APP VIETJACK
Đã trả lời bởi chuyên gia
34879 -
Đã trả lời bởi chuyên gia
30691 -
Hỏi từ APP VIETJACK28306
-
Hỏi từ APP VIETJACK
Đã trả lời bởi chuyên gia
22476
Gửi báo cáo thành công!
