DekthkII
Chia sẻ bởi Đặng Thị Bích Hà |
Ngày 16/10/2018 |
33
Chia sẻ tài liệu: DekthkII thuộc Tin học 7
Nội dung tài liệu:
Họ và tên:……………………………….. ĐỀ KIỂM TRA HỌC KÌ II NĂM HỌC 2008-2009
Lớp: 8/… MÔN: TIN HỌC
( Thời gian: 45 phút)
A - PHẦN TRẮC NGHIỆM:( 3 điểm)
Câu 1: Trong ngôn ngữ lập trình Pascal cÂu lệnh nào sau đây là đúng:
If <điều kiện> then else
If <điều kiện> then; else ;
If <điều kiện> then else ;
If <điều kiện> ; then else ;
Câu 2: Trong ngôn ngữ lập trình Pascal câu lệnh nào sau đây là đúng:
A. If a=5 then a:=d+1; b:=2 else a:=d+2;
B. If a=5 then
begin a:=d+1; b:=2; end;
else a:=d+2;
C. If a=5 then D. If a:=5 then
begin a:=d+1; b:=2; end begin a:=d+1; b:=2; end;
else a:=d+2; else a:=d+2;
Câu 3: Trong ngôn ngữ Pascal, về mặt cú pháp câu lệnh nào sau đây đúng với cấu trúc lặp For cú một lệnh con?
For i=1 to 100 do a:=a-1; B. For i:=1 to 100 do a:=a-1;
C. For i:=1 to 100 do; a:=a-1 D. For i:=1; to 100 do a:=a-1;
Câu 4: Trong câu lệnh lặp for i:=1 to 10 do begin…end; câu lệnh ghộp được thực hiện bao nhiêu lần (noí cách khác, bao nhiêu vòng lặp được thực hiện?)
A. Không lần nào B. 2 lần
C. 1 lần D. 10 lần
Câu 5: Đoạn lệnh sau đây
so:=2;
while so<5 do writeln(so);
so:=so+1;
sẽ cho kết quả gì?
A. In ra các số từ 2 đến 4; B. In ra các số từ 2 đến 5;
C. In ra số 2; D. In ra vô hạn số 2.
B - PHẦN TỰ LUẬN: (7 điểm)
Câu 1: Gạch dưới các câu lệnh em cho là sai, sau đó em viết lại cho đúng?(3 điểm)
Program Tinh_tong; ……………………………………………………
Uses crt; ……………………………………………………
Var N, i: Integer; ……………………………………………………
S: Longint; ……………………………………………………
BEGIN clrscr; ……………………………………………………
Write(‘Nhap vao so N =’ ); Readln(N); ……………………………………………………
S:=0 ……………………………………………………
For i =1 to N do S:=S+I; ……………………………………………………
Writeln(‘Tong cua’,N,’so tu nhien dau tien s = ‘, s); ……………………………………………………
Readln ……………………………………………………
END. …………………………………………………...
Câu 2: Nhập vào từ bàn phím n số nguyên. Đếm xem có bao nhiêu số lẻ.?( 4 điểm)
………………………………………………………Hết……………………………………………………
………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………...............................................................
………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………
………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………
………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………
………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………
………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………
………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………
……………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………
…………………………………………………………………………………………………………………………………………………………………………………………………………………………………………
IV – ĐÁP ÁN - BIỂU ĐIỂM:
A - PHẦN TRẮC NGHIỆM: 3 điểm
Mỗi câu đùng được tính 0,6 điểm.
Câu1: C Câu 2: C Câu 3: B Câu 4: D Câu 5: D
B - PHẦN TỰ LUẬN: 7 điểm
Câu 1: Gạch dưới các câu lệnh em cho là sai, sau đó em viết lại cho đúng?(3 điểm)
Program Tinh_tong;
Uses crt;
Var N, i: Integer;
S: Longint;
BEGIN clrscr;
Write(‘Nhap vao so N =’ ); Readln(N);
S:=0
For i =1 to N do S:=S+I;
Writeln(‘Tong cua’,N,’so tu nhien dau tien s = ‘, s);
Readln
END.
Câu 2:
Program Dem_so;
Uses crt;
Program Tinh_tong;
Uses crt;
Var a: array[1..20] of integer;
i: byte;
dem:byte;
BEGIN clrscr;
For i:=1 to 20 do
Begin
Write(‘a[‘,i:2,’]=’);
Readln(a[i]);
End;
dem:=0;
for i:= 1 to 10 do
if a[i] mod 2 = 1 then dem:=dem+1;
Writeln(‘ so luong so le trong 20 so la:’,dem);
Readln
End.
Lớp: 8/… MÔN: TIN HỌC
( Thời gian: 45 phút)
A - PHẦN TRẮC NGHIỆM:( 3 điểm)
Câu 1: Trong ngôn ngữ lập trình Pascal cÂu lệnh nào sau đây là đúng:
If <điều kiện> then
If <điều kiện> then
If <điều kiện> then
If <điều kiện> ; then
Câu 2: Trong ngôn ngữ lập trình Pascal câu lệnh nào sau đây là đúng:
A. If a=5 then a:=d+1; b:=2 else a:=d+2;
B. If a=5 then
begin a:=d+1; b:=2; end;
else a:=d+2;
C. If a=5 then D. If a:=5 then
begin a:=d+1; b:=2; end begin a:=d+1; b:=2; end;
else a:=d+2; else a:=d+2;
Câu 3: Trong ngôn ngữ Pascal, về mặt cú pháp câu lệnh nào sau đây đúng với cấu trúc lặp For cú một lệnh con?
For i=1 to 100 do a:=a-1; B. For i:=1 to 100 do a:=a-1;
C. For i:=1 to 100 do; a:=a-1 D. For i:=1; to 100 do a:=a-1;
Câu 4: Trong câu lệnh lặp for i:=1 to 10 do begin…end; câu lệnh ghộp được thực hiện bao nhiêu lần (noí cách khác, bao nhiêu vòng lặp được thực hiện?)
A. Không lần nào B. 2 lần
C. 1 lần D. 10 lần
Câu 5: Đoạn lệnh sau đây
so:=2;
while so<5 do writeln(so);
so:=so+1;
sẽ cho kết quả gì?
A. In ra các số từ 2 đến 4; B. In ra các số từ 2 đến 5;
C. In ra số 2; D. In ra vô hạn số 2.
B - PHẦN TỰ LUẬN: (7 điểm)
Câu 1: Gạch dưới các câu lệnh em cho là sai, sau đó em viết lại cho đúng?(3 điểm)
Program Tinh_tong; ……………………………………………………
Uses crt; ……………………………………………………
Var N, i: Integer; ……………………………………………………
S: Longint; ……………………………………………………
BEGIN clrscr; ……………………………………………………
Write(‘Nhap vao so N =’ ); Readln(N); ……………………………………………………
S:=0 ……………………………………………………
For i =1 to N do S:=S+I; ……………………………………………………
Writeln(‘Tong cua’,N,’so tu nhien dau tien s = ‘, s); ……………………………………………………
Readln ……………………………………………………
END. …………………………………………………...
Câu 2: Nhập vào từ bàn phím n số nguyên. Đếm xem có bao nhiêu số lẻ.?( 4 điểm)
………………………………………………………Hết……………………………………………………
………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………...............................................................
………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………
………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………
………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………
………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………
………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………
………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………
……………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………
…………………………………………………………………………………………………………………………………………………………………………………………………………………………………………
IV – ĐÁP ÁN - BIỂU ĐIỂM:
A - PHẦN TRẮC NGHIỆM: 3 điểm
Mỗi câu đùng được tính 0,6 điểm.
Câu1: C Câu 2: C Câu 3: B Câu 4: D Câu 5: D
B - PHẦN TỰ LUẬN: 7 điểm
Câu 1: Gạch dưới các câu lệnh em cho là sai, sau đó em viết lại cho đúng?(3 điểm)
Program Tinh_tong;
Uses crt;
Var N, i: Integer;
S: Longint;
BEGIN clrscr;
Write(‘Nhap vao so N =’ ); Readln(N);
S:=0
For i =1 to N do S:=S+I;
Writeln(‘Tong cua’,N,’so tu nhien dau tien s = ‘, s);
Readln
END.
Câu 2:
Program Dem_so;
Uses crt;
Program Tinh_tong;
Uses crt;
Var a: array[1..20] of integer;
i: byte;
dem:byte;
BEGIN clrscr;
For i:=1 to 20 do
Begin
Write(‘a[‘,i:2,’]=’);
Readln(a[i]);
End;
dem:=0;
for i:= 1 to 10 do
if a[i] mod 2 = 1 then dem:=dem+1;
Writeln(‘ so luong so le trong 20 so la:’,dem);
Readln
End.
* 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ẻ: Đặng Thị Bích Hà
Dung lượng: 53,50KB|
Lượt tài: 0
Loại file: doc
Nguồn : Chưa rõ
(Tài liệu chưa được thẩm định)