Giỏ trị của biến thỡ cú thể thay đổi được tại từng thời điểm thực hiện chương trỡnh. (0.25 điểm)
Giỏ trị của hằng khụng thay đổi trong suốt quỏ trỡnh thực hiện chương trỡnh. (0.25 điểm)
Program Tinh_tong; Var N, i: integer; P: longint; Begin Write(‘Nhap so N= ’); Readln(N); P:= 0; For i:= 1 to N do
If i mod 2 =0 then P:=P+i;
Writeln(‘Tong cac so chan cua’, N,’ so tu nhien dau tien P= ‘,P); Readln;
End.
PHềNG GD-ĐT HUYỆN QUẢNG TRẠCH ĐỀ KIỂM TRA HỌC
TRƯỜNG THCS QUẢNG LỘC Mụn : Tin học 8 Thời gian: 45 phỳt
Họ và tờn :………Lớp : ………..………. Lớp : ………..……….
Điểm Đề II
A. TRẮC NGHIỆM: (5 điểm)
I./ (3 điểm) Hĩy khoanh trũn vào chữ cỏi đứng trước cõu trả lời đỳng nhất:
Cõu 1./ Con người viết chương trỡnh để
a./ Hướng dẫn mỏy tớnh thực hiện cỏc cụng việc cần thiết b./ Nghe nhạc hay soạn thảo văn bản
c./ Mỏy tớnh hiểu sở thớch con người d./ Mỏy tớnh hoạt động được Cõu 2./ Ngụn ngữ lập trỡnh bao gồm?
a./ Bảng chữ cỏi tiếng anh b./ Bảng chữ cỏi và cỏc phộp toỏn ( +,-,*,/...) c./ Từ khúa và bảng chữ cỏi d./ Bảng chữ cỏi và cỏc quy tắc
Cõu 3./ Cỏc tờn sau đõy, tờn nào hợp lệ
a./ a; b./ tam giac; c./ vidu; d./ abc.
Cõu 4/ Kết quả hiển thị trờn màn hỡnh cõu lệnh writeln(’15-11=’, ‘15-11’) là
a./ 1115-11=-4 b./ -4 c./ 15-11=, ‘15-11’ d./ 15-11=15-11
Cõu 5./ Từ nào sau đõy khụng phải là từ khúa:
a. program b.end c. exel d.begin
Cõu 6./ Khai bỏo biến x kiểu kớ tự ta thực hiện
a./ Var x: integer; b./ var x: string; c./ Var x: char; d./ type x:array[1..10] of char; Cõu 7./ Kết quả phộp so sỏnh sau là 10-x > 2
a./ Đỳng b./ Sai
c./ khụng cú kết quả d./ Đỳng hay sai phụ thuộc vào giỏ trị của x Cõu 8./ Biểu thức toỏn học -ax2-bx+c được viết bằng kớ hiệu pascal là
a./ a*x*2+b*x+c; b./ -a* x*x -b*x+c; c./ a*x^2+b*x+c; d./ a .x.x+b.x+c. Cõu 9 Giả sử x là biến kiểu dữ liệu xõu. Phộp gỏn nào sau đõy hợp lệ ?
a./ x :=3 ; b./ x :=’3’ ; c./ x := “3”; d./ x:=(3) ;
Cõu 10Cõu lệnh nào sau đõy dựng để nhập một số từ bàn phớm vào biến x?
a. Writeln(‘Nhập x = ’); b. Readn(x); c. Writeln(x); d. Readln(x); Cõu 11 Giỏ trị của x sẽ là bao nhiờu? nếu trước đú giỏ trị của x bằng 5: if x div 2=1 then x:=x+1;
a./ 6 b./4 c./ 5 d./ 7
Cõu 12 Cú đoạn chương trỡnh: x:=2; y:=5; for i:=1 to 3 do begin x:=x+1; y:=y+x; end; writeln(x,’ ‘,y);
a./ 2 5 b./ 5 17 c./ 6 18 d./ 17 5
II./ Hĩy thay đổi trật tự của cỏc cõu lệnh và sửa cỏc lỗi sai để được chương trỡnh đỳng. Mỗi ý đỳng 0.25 điểm.
Program Tinh_tong {cac so tư nhien }
Sửa lại Var N, i: integer S: longint; Begin Write(‘Nhap N= ‘); Readln(N); S:=1; Writeln(‘Tich la’, S); For i:= 1 to N do S:=S*i; Readln
End.
B. TỰ LUẬN: (5 điểm)
Cõu 1./(1.5 điểm) Trỡnh bày cỳ phỏp và hoạt động và cỏch xỏc định số vũng lặp của cõu lệnh lặp trong
ngụn ngữ lập trỡnh Pascal?
Cõu 2./ (1.5 điểm) Biến là gỡ? Hằng là gỡ? Viết cỳ phỏp khai bỏo biến, hằng và lệnh gỏn trong Pascal?
Cõu 3./ (2 điểm) Viết chương trỡnh tớnh tớch cỏc số chẳn của N số tự nhiờn đầu tiờn với N là số tự nhiờn được nhập vào từ bàn phớm.
ĐÁP ÁN KIỂM TRA HK1 –MễN TIN HỌC 8 – ĐỀ II
A. TRẮC NGHIỆM: (5 điểm)I./ Mỗi ý đỳng 0.25 điểm. I./ Mỗi ý đỳng 0.25 điểm.
Cõu 1 2 3 4 5 6 7 8 9 10 11 12
Đ. Án A D C D C C D B B D C B
II./ (1 điểm)
Mỗi ý đỳng 0.25 điểm.
Program Tinh_tong {cac so tư nhien }
Sửa lại
Program Tinh_tong {cac so tư nhien }
Var N, i: integer Var N, i: integer;
S: longint; S: longint;
Begin Begin
Write(‘Nhap N= ‘); Readln(N); Write(‘Nhap N= ‘); Readln(N);
S:=1; S:=0;
Writeln(‘Tich la’, S); For i:= 1 to N do S:=S+i;
For i:= 1 to N do S:=S*i; Writeln(‘Tong la’, S);
Readln Readln
End. End.
III./ Mỗi ý đỳng 0.25 điểm.
1 Tờn biến 2 Kiểu dữ liệu của biến 3 Gỏn 4 Tớnh toỏn
B. TỰ LUẬN: (5 điểm)
Cõu 1./(1.5 điểm) Trỡnh bày cỳ phỏp và hoạt động và cỏch xỏc định số vũng lặp của cõu lệnh lặp biết trước trong ngụn ngữ lập trỡnh Pascal?
- Cỳ phỏp: for <biến đếm>:= <giỏ trị đầu> to <giỏ trị cuối> do <cõu lệnh>; (0.5 điểm)
Trong đú: for, to, do là cỏc từ khúa, biến đếm là biến kiểu nguyờn, giỏ trị đầu và giỏ trị cuối là cỏc giỏ trị nguyờn và giỏ trị cuối khụng phải nhỏ hơn giỏ trị đầu.