Viết chương trình nhập vào kích thước của một hình chữ nhật.Tính diện tích và chu vi rồi in ra kết quả
Quảng cáo
1 câu trả lời 801
Program Chu_Nhat_Program;
Uses Crt;
Var a,b,s,c: real;
Begin
Clrscr;
Writeln(‘ TINH DIEN TICH & CHU VI HINH CHU NHAT:’);
Write(‘Nhap chieu dai=’); readln(a);
Write(‘Nhap chieu r />s:=a*b;
c:=(a+b)*2;
Writeln(‘Dien tich hinh chu nhat la:’,s:6:2); Writeln(‘Chu vi hinh chu nhat:’,c:6:2); 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
45418 -
Hỏi từ APP VIETJACK
Đã trả lời bởi chuyên gia
34844 -
Đã trả lời bởi chuyên gia
30643 -
Hỏi từ APP VIETJACK28229
-
Hỏi từ APP VIETJACK
Đã trả lời bởi chuyên gia
22422
Gửi báo cáo thành công!
