Câu 1:
uses crt;
var f:text;
x,y:longint;
begin
assign(f,'bai1.txt');reset(f);
read(f,x,y);
close(f);
end.
Câu 2:
Biến toàn cục: d,X1.
Biến cục bộ: j.
Tham số hình thức: a,Xt.
Tham số thực sự: d,X1.
Tham số biến: Xt.
Tham số giá trị: a.
Lệnh gọi chương trình con: Xoa(d,X1).