Lop 11

Họ và tên: Kiểm tra 45 phút
Lớp 11 Môn tin học

I. Trắc nghiệm (Em hãy khoanh tròn câu đúng)
1/** 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(A) else write(B); b If A > B then Readln(A) else Readln(B);
c If A < B then writeln(A) else writeln(B); d If A > B then write(B) else write(A);
2/ Cho N là biến kiểu nguyên, chọn câu đúng cú pháp:
a If N < 10 then write (` 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 N := 10 else N > 20 then write (` N > 20 `);
d If N < 10 then write (` Nho hon 10 `) else write (` Lon hon 10 `);
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, b , c ) > 1 then write(1); b if a > 1 and b > 1 and c > 1 then write(1);
c if (a>1) and ( b > 1) and ( c > 1) then write(1); d if (a > 1) or (b > 1) or (c > 1) then write(1);
4/ Cho S, i và N>0 là các biến nguyên. Ðể tính tổng các số lẽ từ 1 đến N, ta viết:
a S := 0; For i := 1 to N do S := S + i*2;
b S := 0; For i := 1 to N do If i mod 2 <> 0 then S:=S+i;
c S := 1; For i := 1 to N do S := S * i + 2;
d S := 1; For i := 1 to N do If i mod 2 <> 0 then S:=S+i;
5/ Cho var N:integer; chọn câu lệnh đúng:
a If (N < 1) or (N > 10) then write (` So co 1 chu so`);
b If (N < 10) then write (` So co 1 chu so`);
c If (N > 0) and (N < 10) then write (` So co 1 chu so`);
d If (N > 0 and N < 10) then write (` So co 1 chu so`);
6/ Với S, i là các biến nguyên. Cho đoạn chương trình sau:
i:=1; S:=0;
While i < 5 Do begin S:=S+5; i:=i+1; end;
write(S);
Kết quả của S là: a 25 b 30 c 15 d 20
7/ Với P, i là các biến nguyên. Cho đoạn chương trình sau:
P:= 1; i:= 1;
While i<=4 Do begin P:= P * i; i:= i + 1; end;
write(P);
Giá trị sau cùng của P là : a 120 b 4 c 24 d 6
8/ Cho a,b,z là các biến nguyên, cho đoạn chương trình:
a:=5: b:=8;
While a>b Do a:=a+1;
Write(a:3, b:3);
Kết quả giá trị của a, b là:
a a=8, b=5 b a=8, b=8
c a=5, b=8 d không xác định giá trị vì lặp vô hạn
9/ Với i là các biến nguyên. Cho câu lệnh sau: For i:=1 to 5 do If i mod 2<>0 then Write (i:2);
Kết quả hiện lên màn hình là:
a 1 3 5 b 1 c 5 d 2 4 6
10/ Với i là các biến nguyên. Cho đoạn chương trình sau:
For i:=1 to 5