KTHKI_40Cau
Chia sẻ bởi Trương Văn Tàu |
Ngày 26/04/2019 |
55
Chia sẻ tài liệu: KTHKI_40Cau thuộc Tin học 11
Nội dung tài liệu:
ĐỀ KIỂM TRA CHẤT LƯỢNG HỌC KÌ I - NĂM HỌC
MÔN TIN HỌC – LỚP 11
Thời gian làm bài 45 phút, không kể thời gian phát đề.
(Học sinh không được sử dụng tài liệu)
Họ và tên HS:..................................................................... Lớp: .............................
Điểm (Số)
Điểm (Chữ)
Nhận xét của thầy (cô)
Học sinh đánh dấu X vào câu trả lời đúng nhất theo bảng dưới đây:
Câu
01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
A
B
C
D
Câu
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
A
B
C
D
Câu 1: Cú pháp biểu diễn cấu trúc rẽ nhánh dạng thiếu là:
A. If <điều kiện> then
B. If <điều kiện> ; then
C. If <điều kiện> then
D. If <điều kiện> then
Câu 2: Câu lệnh nào sau đây là đúng?
A. if a = 5 then a = d + 1 else a = d + 2; B. if a: = 5 then a := d + 1 else a := d + 2;
C. if a = 5 then a := d + 1; else a := d + 2; D. if a = 5 then a := d + 1 else a := d + 2;
Câu 3: Lệnh nào sau đây in ra màn hình số lớn nhất trong hai số a, b?
A. If a <= b then write(a) else write (b); B. If a > b then write(b) else write (a);
C. If a > b then write(a) else write (b); D. If a > b then write(a); else write(b);
Câu 4: Cho biết kết quả của đoạn chương trình sau?
N:=5;tong:=0;
For i:=1 to n do
If ( i mod 3=0) then Tong:=tong+i;
Write(tong);
A. 1 B. 5 C. 10 D. 3
Câu 5: Kiểu số nguyên gồm:
A. Byte, Integer, Word, Longint, Real B. Byte, Integer, Word, Longint
C. Byte, Integer, Word, Real D. Real, Integer, Word, Longint
Câu 6: Cho S1 = ‘abCbcabc’ và S2 = ‘bc’, cho biết kết quả hàm POS(S2,S1):
A. 3 B. 2 C. 4 D. 7
Câu 7: Cho biết kết quả in ra màn hình khi chạy chýõng trình:
Var St : String;
i,L : integer;
Begin
St:=`ABCD`; L := Length(St);
For i:= L Downto 1 do write (St[i]);
End.
A. DCAB B. ABCD C. 4321 D. DCBA
Câu 8: Khai báo nào đúng trong các khai báo sau:
A. Var a; b; c : Real; B. Var a, b, c : Interger;
C. Var a, b, c : Real; D. Var a b c : Real;
Câu 9: Cho đoạn chương trình :
T := 0 ;
For i := 10 to 20 do
If i mod 10 = 0 then t := t + i ;
Writeln(t) ;
Sau khi thực hiện, t có giá trị?
A. 11 B. 45 C. 12
* Một số tài liệu cũ có thể bị lỗi font khi hiển thị do dùng bộ mã không phải Unikey ...
Người chia sẻ: Trương Văn Tàu
Dung lượng: |
Lượt tài: 0
Loại file:
Nguồn : Chưa rõ
(Tài liệu chưa được thẩm định)