1 - Cho khai báo sau: VAR i: integer; c: char; r: real; Hãy cho biết nhóm lệnh nào sau đây viết đúng ngữ pháp? [a] Các lệnh i:=7; r:=i; write(r) [b] Các lệnh c:=’9’; i:=9; if i=c then write("hop le’) [c] Các lệnh i:=7; c:=ord(r); i:=ord(c) [d] Cả ba nhóm lệnh trên đều có lỗi sai 2 - Cho khai báo sau: VAR i: integer; c: char; r: real; Hãy cho biết nhóm lệnh nào sau đây viết đúng ngữ pháp? [a] Các lệnh i:=7; r:=9; writeln(r>i+1) [b] Các lệnh c:=’9’; i:=9; if i=ord(c) then write("hop le’) [c] Các lệnh i:=7; c:=ord(r); r:=ord(c) [d] Cả ba nhóm lệnh trên đều có lỗi sai 3 - Cho x, y, z và t có loại integer. Sau khi thi hành các lệnh: x:=5; y:=3; z:=5; t:=6; If x>y then If y>z then t:=y ELSE t:=x Giá trị của t là bao nhiêu? [a] t:=5 [b] t:=6 [c] t:=7 [d] t:=8 4 - Cho x, y, z, t thuộc kiểu integer. Sau khi thi hành các lệnh: x:=5; y:=3; z:=5; t:=4; IF x>=y THEN IF y>z-1 THEN t:=y ELSE t:=x+1 Giá trị của t là bao nhiêu? [a] t:=6 [b] t:=4 [c] t:=2 [d] t:=8 5 - Cho x, y, z, t thuộc kiểu integer. Sau khi thi hành các lệnh: x:=5; y:=3; z:=5; t:=1; IF x>=y THEN IF y>=z-2 THEN t:=y+2 ELSE t:=x-1 Giá trị của t là bao nhiêu? [a] t:=1 [b] t:=2 [c] t:=5 [d] t:=4 6 - Cho x, y, z, t thuộc kiểu integer. Sau khi thi hành các lệnh: x:=5; y:=3; z:=5; t:=5; IF x>=y THEN IF y+2>=z THEN t:=y-1 ELSE t:=x-1 Giá trị của t là bao nhiêu? [a] t:=4 [b] t:=2 [c] t:=6 [d] t:=7 7 - Xét chương trình Pascal sau đây: PROGRAM TD; VAR i, j: integer; BEGIN i:=1; j:=2; IF (i<=1) AND (j>2) THEN IF (i>0) OR (j<> Write(3) ELSE Write(4) END. [a] Khi thi hành, chương trình in ra 3 [b] Khi thi hành, chương trình in ra 4 [c] Khi thi hành, chương trình không in ra gì cả [d] Khi dịch, chương trình báo lỗi ngữ pháp 8 - Xét chương trình Pascal sau đây: PROGRAM td; VAR i, j: integer; BEGIN i:=1; j:=3; IF (i<=1) AND (j>2) THEN IF (i:=0) OR (j<> Write(3) ELSE Write(4) END. [a] Khi thi hành, chương trình in ra 3 [b] Khi thi hành, chương trình in ra 4 [c] Khi thi hành, chương trình không in ra gì cả [d] Khi dịch, chương trình báo lỗi ngữ pháp 9 - Xét chương trình Pascal sau đây: PROGRAM td; VAR i, j: integer; BEGIN i:=1; j:=3; IF (i=1) AND (j>2) THEN IF (i>0) OR (j<> Write(3) ELSE Write(4) END. [a] Khi thi hành, chương trình in ra 3 [b] Khi thi hành, chương trình in ra 4 [c] Khi thi hành, chương trình không in ra gì cả [d] Khi dịch, chương trình báo lỗi ngữ pháp 10 - Cho khai báo sau trong ngôn ngữ Pascal: TYPE a=record Hoten: array[0 40] of char; Tuoi: integer END; Pt=^b; b=RECORD info: a; last: pt; next: pt; END; VAR p1, p2: pt; x:a; y:=b; Hãy chọn lệnh viết sai trong các lệnh sau? [a] New(p1) [b] New(p1^.next) [c] New(p1^.next.last) [d] New(p1^.info) Làm l?i Solutions! Question 1 a Question 2 b Question 3 a Question 4 a Question 5 c Question 6 b Question 7 c Question 8 d Question 9 b Question 10 d . là bao nhiêu? [a] t:=4 [b] t: =2 [c] t:=6 [d] t:=7 7 - Xét chương trình Pascal sau đây: PROGRAM TD; VAR i, j: integer; BEGIN i:=1; j: =2; IF (i<=1) AND (j> ;2) THEN IF (i>0) OR (j<>. nhiêu? [a] t:=6 [b] t:=4 [c] t: =2 [d] t:=8 5 - Cho x, y, z, t thuộc kiểu integer. Sau khi thi hành các lệnh: x:=5; y:=3; z:=5; t:=1; IF x>=y THEN IF y>=z -2 THEN t:=y +2 ELSE t:=x-1 Giá trị của. bao nhiêu? [a] t:=1 [b] t: =2 [c] t:=5 [d] t:=4 6 - Cho x, y, z, t thuộc kiểu integer. Sau khi thi hành các lệnh: x:=5; y:=3; z:=5; t:=5; IF x>=y THEN IF y +2& gt;=z THEN t:=y-1 ELSE t:=x-1 Giá