- Lệnh nào sau đây in ra màn hình số lớn nhất giữa A và B?

[a]--If A > B then write(B) else write(A)

[b]--If A > B then write(A) else write(B)

[c]--If A > B then Readln(A) else Readln(B)

[d]--If A < B then writeln(A) else writeln(B)

2 - Cho N là biến kiểu nguyên, chọn câu đúng cú pháp?

[a]--If N < 10 then writeln (`Nho hon 10`) else write (`Lon hon 10`)

[b]--If N < 10 Write (`Nho hon 10`) else then write (`Lon hon 10`)

[c]--If N < 10 then write (`Nho hon 10`) else write (`Lon hon 10`)

[d]--If N < 10 then N := 10 else N > 20 then write (`N > 20`)

3 - Kiểm tra nếu ba số a, b, c đều lớn hơn 1 thì in số 1, chọn lệnh nào?

[a]--If (a > 1) and ( b > 1) and ( c > 1) then write(1)

[b]--If (a > 1) or (b > 1) or (c > 1) then write(1)

[c]--If a > 1 and b > 1 and c > 1 then write(1)

[d]--If a, b , c đều > 1 then write(1)

4 - Cho i là biến nguyên. Sau khi thực hiện các lệnh? i:=2; Case i of 1: i:=i+1; 2: i:=i+2; 3: i:=i+3; End; Giá trị sau cùng của i là?

[a]--2

[b]--3

[c]--4

[d]--5

5 - Cho N là biến nguyên, sau khi thực hiện các lệnh: N:= 9; If N< 0 then writeln("So am’) else Case N mod 2 of 0: Writeln("Chan’); 1: Writeln("Le’); End; Kết quả in lên màn hình là?

[a]--Chan

[b]--Le

[c]--So am

[d]--Không in gì cả

6 - Giả sử i là biến nguyên, sau khi thực hiện các lệnh: i:=5; Case i of 1: i:=i+1; 2: i:=i+2; 3: i:=i+3; else i:=2*i; End; Thì giá trị sau cùng của i là?

[a]--10

[b]--6

[c]--8

[d]--9

7 - Cho ch biến ký tự, i biến nguyên, sau khi thực hiện các lệnh: i:= -15; ch:=`E`; Case i of 0..14 : ch:=`D`; 15..20: ch:=`C`; 21..24: ch:=`B` else ch:=`A`; End; Thì giá trị sau cùng của ch là?

[a]--`A`

[b]--`B`

[c]--`C`

[d]--`E`

8 - Cho ch biến ký tự, i biến nguyên. Ðể gán trị cho biến ch, thì lệnh: Case i of 0,1,2 : ch:=`A`; 3..8 : ch:=`B`; else ch:=`C`; end; Tương đương với nhóm lệnh nào?

[a]--If i<0 then ch:=’C’ else if i<=2 then ch:=’A’ else if i<=8 then ch:=’B’ else ch:=’C’

[b]--If (i >= 0) and (i<= 2) then ch:=`A`; if (i>=3) and (i<=8) then ch:=`B` else ch:=`C`

[c]--If i<0 then ch:=’A’ else if i<=2 then ch:=’C’ else if i<=8 then ch:=’A’ else ch:=’C’

[d]--If (i >= 0) and (i<= 2) then ch:=`C`; if (i>=3) and (i<=8) then ch:=`C` else ch:=`A`

9 - Khi chạy chương trình: Var S,i: Integer; Begin i := 3 S:= 40; if ( i > 5 ) then S:= 5 * 3 + ( 5 - i ) * 2 else if ( i > 2 ) then S:= 5 * i else S:= 0 End. Giá trị sau cùng của S là?

[