1. Trang chủ
  2. » Cao đẳng - Đại học

de kt tin 8 tuan 29

3 6 0

Đang tải... (xem toàn văn)

THÔNG TIN TÀI LIỆU

Thông tin cơ bản

Định dạng
Số trang 3
Dung lượng 80 KB

Các công cụ chuyển đổi và chỉnh sửa cho tài liệu này

Nội dung

Gọi điện cho tới khi có người nhấc máy Câu 5: Cách viết câu lệnh lặp với số lần biết trước như sau:.. Hãy chọn phương án đúng.[r]

Trang 1

Đề chính thức KIỂM TRA HKII NĂM HỌC 2010 -2011 Môn :Tin học, Lớp:8

I -

PHẦN TRẮC NGHIỆM KHÁCH QUAN : ( 2 đ ) - Thời gian làm bài 15 phút

Thí sinh chọn chữ cái chỉ kết quả mà em chọn là đúng và ghi vào tờ giấy làm bài.

Câu 1: Cấu trúc rẽ nhánh dạng đầy đủ trong ngôn ngữ lập trình Pascal có dạng:

A if <câu lệnh 1> then <câu lệnh 2>;

B if <điều kiện1> then <câu lệnh1>;

C if <điều kiện> then < câu lệnh 1> else <câu lệnh 2>;

D if <điều kiện> then <câu lệnh>;

Câu 2: Khi viết câu lệnh lặp for do…

A Giá trị đầu bằng giá trị cuối B Giá trị cuối phải lớn hơn giá trị đầu

C Giá trị đầu lớn hơn giá trị cuối D Tất cả đều sai

Câu 3: Câu lệnh gotoxy(a,b) có tác dụng

A Đưa con trỏ về hàng b B Đưa con trỏ về cột a

C Đưa con trỏ về cột a hàng b D Tất cả đều đúng

Câu 4: Các hoạt động nào dưới đây lặp với số lần nhất định:

A Ngày đánh răng ba lần B Mỗi ngày đi học một lần

C Học cho đến khi thuộc bài D Gọi điện cho tới khi có người nhấc máy

Câu 5: Cách viết câu lệnh lặp với số lần biết trước như sau:

Hãy chọn phương án đúng

A For <biến đếm> = <giá trị đầu> to <giá trị cuối> do <câu lệnh>;

B For <biến đếm>: = <gía trị cuối> to <giá trị đầu> do <câu lệnh>;

C For <biến đếm> := <giá trị đầu> to <giá trị cuối> do <câu lệnh>;

D For <biến đếm> = <giá trị cuối> to <giá trị đầu> do <câu lệnh>

Câu 6: Khi nào thì câu lệnh For…to…do kết thúc?

A Khi biến đếm lớn hơn giá trị cuối

B Khi biến đếm nhỏ hơn giá trị cuối

C Khi biến đếm bằng giá trị cuối

D Khi biến đếm lớn hơn giá trị đầu

Câu 7: Chọn khai báo hợp lệ:

A Var a,b: array[1 n] of real; C Var a,b: array[1 100] of real;

B Var a,b: array[1:n] of real; D Var a,b: array[1…n] of real;

Câu 8: Cú pháp khai báo biến mảng trong Pascal là:

A.var <Tên mảng> ; array [<chỉ số đầu> <chỉ số cuối>] of <kiểu dữ liệu >;

B var <Tên mảng> : array [<chỉ số đầu>…<chỉ số cuối>] of <kiểu dữ liệu >;

C var <Tên mảng> : array [<chỉ số đầu> <chỉ số cuối>] of <kiểu dữ liệu >;

D.var <Tên mảng> : array [<chỉ số đầu>…<chỉ số cuối>] for <kiểu dữ liệu >;

Hết

Trang 2

-Đề chính thức KIỂM TRA HKII NĂM HỌC 2010 -2011 Môn :Tin học, Lớp:8

II - PHẦN TỰ LUẬN : ( 8 đ) - Thời gian làm bài 45phút

Câu 1: ( 2đ) Hãy điền Đ/ S (Đúng/Sai) vào ô vuông cho các phát biểu sau đây:

1)Trong câu lệnh lặp: for <biến đếm>:=<giá trị đầu> to <giá trị cuối> do <câu

lệnh>; nếu giá trị đầu nhỏ hơn giá trị cuối thì chương trình dịch sẽ báo lỗi để ta chỉnh sửa

lại

2)  Không nên thay đổi giá trị của “biến đếm” trong câu lệnh lặp for do, ví dụ câu

lệnh lặp sau đây là không nên sử dụng: for i:=1 to n do i:=i + 2;

3) Câu lệnh sau do trong câu lệnh lặp While do có thể không được thực hiện một lần nào nếu ngay từ đầu, điều kiện điều khiển vòng lặp có giá trị “Sai”.

4) Mọi câu lệnh lặp for do đều có thể thay thế một cách thích hợp bởi câu lệnh lặp While do

Câu 2: ( 2đ) Điền X vào các ô sao cho phù hợp và giải thích vì sao?

Câu 3: (4đ) Viết chương trình nhập 10 số nguyên.Xuất ra màn hình số số lẻ.

BÀI LÀM

I - PHẦN TRẮC NGHIỆM KHÁCH QUAN :

Kết quả

II - PHẦN TỰ LUẬN :

HƯỚNG DẪN CHẤM

Ðề kiểm tra HKII Năm học 2010 -2011 - Môn :Tin học , lớp:8

I -

PHẦN TRẮC NGHIỆM KHÁCH QUAN : ( 2 đ)

a) if a>b then max:=a; else max:=b;

b) var X: Array[5 10] Of Real;

c) X:=10; while X:=10 do X := X+5;

d) for i:=1.5 to 10 do m:=m + 1;

Trang 3

II - PHẦN TỰ LUẬN : ( 8 đ)

Câu 1: (2đ) Mỗi ý đúng 0.5đ

Câu 2: ( 2đ) Mỗi ý đúng 0.5đ

Câu 3: ( 4đ)

Program Sosole;

Uses crt;

Var A:array[1 10] of interger;

dem, i: integer;

Begin

Clrscr;

For i:=1 to 10 do

Write(‘Nhap so thu ‘,i);

Readln(A[i]);

Dem:=0;

For i:= 1 to n do

If A[i] mod 2<> 0 then dem:=dem+1;

Writeln(‘Co ‘, dem, ’so le’);

Readln

End

Hết

a) if a>b then max:=a; else max:=b; X Thừa dấu ; trước else

b) var X: Array[5 10] Of Real; X

c) X:=10; while X:=10 do X := X+5; X Sau While phải là phép so sánh d) for i:=1.5 to 10 do m:=m + 1; X Biến đếm i phải là số nguyên

Ngày đăng: 13/05/2021, 16:18

TỪ KHÓA LIÊN QUAN

TÀI LIỆU CÙNG NGƯỜI DÙNG

TÀI LIỆU LIÊN QUAN

w