YOMEDIA
NONE

Chương trình tính tích của hai số nguyên a và b

- Hàm:

Function Tich(a, b: integer): integer;

       Var Kq: Integer;

       Begin

             Kq := a*b;

             Tich := Kq;

       End;

- Thủ tục:

Procedure tt_Tich(a, b: integer);

        Var Kq: Integer;

         Begin

              Kq := a*b;

              Write('Tích của' , a, 'và', b, 'là', Kq);

         End;

Hãy nhận xét cấu trúc hàm và thủ tục của chương trình tính tích ở trên.

Theo dõi Vi phạm
ATNETWORK

Trả lời (1)

  • - Hàm trả về giá trị sau khi thực hiện nên có lệnh gán kết quả cho tên hàm Tích := Kq; và cũng chính vì vậy nên sau khai báo tên hàm có khai báo tên kiểu dữ liệu trả về Tich(a, b: integer): integer;

    - Thủ tục không trả về kết quả nên có câu lệnh xuất kết quả ngay trong thủ tục Write('Tích của , a, ' và ', b, ' là ', Kq);

      bởi thuy tien 09/11/2021
    Like (0) Báo cáo sai phạm

Nếu bạn hỏi, bạn chỉ thu về một câu trả lời.
Nhưng khi bạn suy nghĩ trả lời, bạn sẽ thu về gấp bội!

Lưu ý: Các trường hợp cố tình spam câu trả lời hoặc bị báo xấu trên 5 lần sẽ bị khóa tài khoản

Gửi câu trả lời Hủy
 
NONE

Các câu hỏi mới

AANETWORK
 

 

YOMEDIA
ATNETWORK
ON