K
Khách

Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.

4 tháng 5 2022

giúp mình với

23 tháng 3 2022

ai giải hộ mk pls hạn ngày mai r

24 tháng 3 2022

mik ko bik

17 tháng 4 2022

Program OLM;

var  a,b: integer;

s,p: longint;

begin

write('Nhap chieu dai: '); readln(a);

write('Nhap chieu rong: '); readln(b);

s:=a*b;

p:=(a+b)*2;

writeln('Chu vi hinh chu nhat la: ',p); 

writeln('Dien tich hinh chu nhat la: ',s); 

readln

end.

CÁC BÀI TẬP VỀ CHƯƠNG TRÌNH CON 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...
Đọc tiếp
CÁC BÀI TẬP VỀ CHƯƠNG TRÌNH CON


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;

 

0
25 tháng 2 2022

tick cho e dc ko