Cho chương trình sau:
Program C_trinh_con;
Var d: char;
X1: string;
Procedure Xoa (a: char ; var Xt:string);
Var j: byte;
Begin
j := pos (a, Xt);
while j < > 0 do
begin
delete(Xt, j, 1);
j := pos(a, Xt);
end;
End;
Begin
X1:=’SUCCESSFUL’;
d := ‘S’;
Xoa (d, X1);
End.
a/ Hãy chạy tay cho ra kết quả theo bảng mẫu dưới đây: 
b/ Hãy chỉ ra: biến toàn cục, biến cục bộ, tham số hình thức, tham số thực sự, tham số biến,tham số giá trị trong chương trình trên.
Cho chương trình sau:
Program C_trinh_con;
Var d: char;
X1: string;
Procedure Xoa (a: char ; var Xt:string);
Var j: byte;
Begin
j := pos (a, Xt);
while j < > 0 do
begin
delete(Xt, j, 1);
j := pos(a, Xt);
end;
End;
Begin
X1:=’SEPTEMBER’;
d := ‘E’;
Xoa (d, X1);
End.
a/ Hãy chạy tay cho ra kết quả theo bảng mẫu dưới đây
b/ Hãy chỉ ra: biến toàn cục, biến cục bộ, tham số hình thức, tham số thực sự, tham số biến,tham số giá trị trong chương trình trên.
Cho chương trình sau:
Program Baitap;
Var S1, S2 : string;
Procedure Xu_li_xau(a:string; var St:string);
Var i: byte;
Begin
i := pos (a, St);
while i < > 0 do
begin
delete(St, i, 4);
i := pos(a, St);
end;
End;
Begin
S1 := ‘sen trang, sen hong;
S2 := ‘sen’;
Xu_li_xau(S2,S1);
End.
a/ Hãy chạy tay cho ra kết quả theo bảng mẫu dưới đây:
b/ Hãy chỉ ra: biến toàn cục, biến cục bộ, tham số hình thức, tham số thực sự, tham số biến,tham số giá trị trong chương trình trên.
Cho chương trình sau:
Program Baitap;
Var S1, S2 : string;
Procedure Xu_li_xau(a:string; var St:string);
Var i: byte;
Begin
i := pos (a, St);
while i < > 0 do
begin
delete(St, i, 4);
i := pos(a, St);
end;
End;
Begin
S1 := ‘hoc nua, hoc mai;
S2 := ‘hoc’;
Xu_li_xau(S2,S1);
End.
a/ Hãy chạy tay cho ra kết quả theo bảng mẫu dưới đây:
b/ Hãy chỉ ra: biến toàn cục, biến cục bộ, tham số hình thức, tham số thực sự, tham số biến,tham số giá trị trong chương trình trên.
Cho chương trình sau:
Program kiemtra;
Uses crt;
Var a,b:integer;
Procedure Hoandoi(Var x,y:integer);
Var tg: integer;
Begin
Tg:=x;
x:=y;
y:=tg;
End;
BEGIN
Clrscr;
a:=8;b:=16;
writeln(a,’ ‘,b);
readln
end.
Trả lời các câu hỏi sau:
a, Nêu các khái niệm:
-Tham số hình thức ? ví dụ?
-Tham số thực sự? ví dụ?
-Biến cục bộ? ví dụ?
-Biến toàn cục ? ví dụ?
-Lời gọi chương trình con? ví dụ?
< ví dụ đã có trong chương trình hãy nêu cụ thể>
b, Chương trình con có tên là gì ?Thực hiện công việc gì?Kết quả trên màn hình là gì?
Xét khai báo biến sau:
Var x, y : real;
c : char;
i, j : byte;
Tổng bộ nhớ dành cho các biến đã khai báo là bao nhiêu byte?
A. 17
B. 15
C. 13
D. 12
Chương trình dịch Pascal sẽ cấp phát bao nhiêu byte bộ nhớ cho các biến trong khai báo sau:
Var M, N, I, J: INTEGER;
P, A, B: REAL;
X: EXTENDED;
K:WORD;
A. 44
B. 36
C. 38
D. 42
Xét khai báo biến sau:
Var x, y, z : real;
c : char;
i, j : word;
Tổng bộ nhớ dành cho các biến đã khai báo là bao nhiêu byte?
A. 18
B. 19
C. 21
D. 23
Xét khai báo biến sau:
Var x, y, z : real;
c : char;
i, j : integer;
Tổng bộ nhớ dành cho các biến đã khai báo là bao nhiêu byte?
A. 18
B. 19
C. 21
D. 23
Chương trình dịch Pascal sẽ cấp phát bao nhiêu byte bộ nhớ cho các biến trong khai báo sau:
Var M, N, I, J: INTEGER;
P, A, B, C: REAL;
X: EXTENDED;
K: WORD;
A. 44
B. 36
C. 38
D. 42
