Khánh Minh
Hỏi từ APP VIETJACK
Viết chương trình có sử dụng chương trình con ,tính diện tích và chu vi của hình chữ nhật , cho biết hai số nguyên a,b là hai cạnh của hình chữ nhật được nhập từ bàn phím khi chạy chương trình. Yêu cầu: - Viết 1 chương trình pascal có xây dựng hai chương trình con. +Chương trình con thứ nhất tính diện tích hình chữ nhật diện tích=a×b. +Chương trình con thứ 2 tính chu vi hình chữ nhật chu vi=(a+b )×2
Quảng cáo
1 câu trả lời 794
1 năm trước
uses crt;
var a,b:real;
{----------------------------chuong-trinh-con-tinh-chu-vi-------------------------}
function chuvi(x,y:real):real;
begin
chuvi:=(x+y)*2;
end;
{----------------------------chuong-trinh-con-tinh-dien-tich----------------------}
function dientich(m,n:real):real;
begin
dientich:=m*n;
end;
{-----------------------------chuong-trinh-chinh--------------------------}
begin
clrscr;
repeat
write('Nhap chieu dai:'); readln(a);
write('Nhap chieu rong:'); readln(b);
until (a>0) and (b>0) and (a>=b);
writeln('Chu vi hinh chu nhat la: ',chuvi(a,b):4:2);
writeln('Dien tich hinh chu nhat la: ',dientich(a,b):4:2);
readln;
end.
Quảng cáo
Câu hỏi hot cùng chủ đề
Gửi báo cáo thành công!