Quảng cáo
1 câu trả lời 125
uses crt;
var dai,rong,cv,dt:real;
begin
clrscr;
write('nhap chieu dai:'); readln(dai);
write('nhap chieu rong:'); readln(rong);
if (dai>0) and (rong>0) and (dai>=rong) then
begin
cv:=(dai+rong)*2;
dt:=dai*rong;
writeln('chu vi hinh chu nhat la: ',cv:4:2);
writeln('dien tich hinh chu nhat la: ',dt:4:2);
end
else writeln('vui long nhap lai');
readln;
end.
Quảng cáo
Bạn cần hỏi gì?
Câu hỏi hot cùng chủ đề
-
Đã trả lời bởi chuyên gia
149303 -
Đã trả lời bởi chuyên gia
99719 -
Đã trả lời bởi chuyên gia
97338 -
Đã trả lời bởi chuyên gia
80007 -
Đã trả lời bởi chuyên gia
72853 -
Đã trả lời bởi chuyên gia
55936 -
Đã trả lời bởi chuyên gia
55307
Gửi báo cáo thành công!
