+ Biến toàn cục: a, b;

+ Biến cục bộ: tg;

+ Tham số thực sự: a, b;

+ Tham trị: y;

+ Tham biến: x;

+ Khi chạy chương trình sẽ có 1 lỗi nhỏ là: sai ở  Procedure vidu(Var x:integer; y:integer):integer; Do đây là chương trình con (không trả về dữ liệu) chứ không phải là hàm (trả về dữ liệu).

Sửa: Function vidu(Var x:integer; y:integer);

- Biến toàn cục là: a, b

- Biến cục bộ là: x, y, tg

- Tham số thực sự: a, b

- Tham trị: y

- Tham biến: x

- Khi biên dịch chương trình sẽ có 1 lỗi nhỏ là: phía sau phần khai báo thủ tục ở trong chương trình trên có gán giá trị cho thủ tục.

=> Sửa: bỏ cụm ": integer" ở chỗ Procedure vidu(Var x: integer; y: integer) : integer;

Vì: thủ tục không có giá trị trả về nên không gán giá trị cho thủ tục.

Xin câu trả lời hay nhất ạ :3