BT_04_01: Viết chương trình con tính chu vi và diện tích của hình chữ nhật.
Giải: Ta thấy rằng chương trình con tính chu vi, diện tích của hình chữ nhật nhất định phải có tham số đầu vào là 2 cạnh, đó là 2 tham trị. Nếu ta viết chương trình con là thủ tục thì kết quả phải lưu bằng một tham biến để đưa ra. Đặt tên các thủ tục là chu_vi, dien_tich ta cài đặt như sau:
procedure Chu_vi(a,b : real; var c : real);
begin
C := 2*(a+b);
end;
{=================================}
procedure Dien_tich(a,b : real; var d : real);
begin
d := a*b;
end;
Tuy nhiên kết quả ra là kiểu thực, là kiểu mà hàm có thể trả lại nên ta có thể cài đặt 2 chương trình con trên bằng hàm như sau:
function Chu_vi(a,b : real): real;
Begin
Chu_vi := 2*(a+b);
end;
{=================================}
function Dien_tich(a,b : real): real;
begin
Dien_tich := a*b;
end;
làm hộ mình với, mình đang cần gấp