Kiểm Tra Một Tiết Hki.doc

Trang 1/3 Mã đề 134 Kiểm tra một tiết HKI Môn TIN 11 Thời gian 45 phút Họ tên học sinh Lớp PHẦN TRẮC NGHIỆM (5 điểm) Học sinh giải các bài toán hay trả lời ngắn gọn các câu hỏi vào các dòng trống tươn[.]

Trang 1

Kiểm tra một tiết HKI Môn: TIN 11

Thời gian: 45 phút

Họ tên học sinh: Lớp……

PHẦN TRẮC NGHIỆM : (5 điểm)

Học sinh giải các bài toán hay trả lời ngắn gọn các câu hỏi vào các dòng trống tương ứng của từng câu .

01 ; / = ~ 06 ; / = ~ 11 ; / = ~ 16 ; / = ~

02 ; / = ~ 07 ; / = ~ 12 ; / = ~ 17 ; / = ~

03 ; / = ~ 08 ; / = ~ 13 ; / = ~ 18 ; / = ~

04 ; / = ~ 09 ; / = ~ 14 ; / = ~ 19 ; / = ~

05 ; / = ~ 10 ; / = ~ 15 ; / = ~ 20 ; / = ~

Mã đề: 134 Câu 1 Kết quả đoạn chương trình sau khi nhập a=0, b=1

IF a=0 then

IF b=0 then

Writeln('VSN') Else

Writeln('VN') Else

Writeln(-b/a:10:2);

Câu 2 Đọan chương trình sau khi chạy cho kết quả gì?

A:=0;

If a>0 then

X:=1;

Y:=2

Else

X:=2

Writeln(x);

Câu 3 Xét chương trình Pascal cho khung dưới đây :

PROGRAM vi_du;

BEGIN

Writeln('Xin chao cac ban');

Writeln('Moi cac ban lam quen voi Pascal');

END.

Chọn phát biểu sai trong các phát biểu dưới đây :

A.Thân chương trình có hai câu lệnh B. Chương trình không có khai báo hằng

C.Khai báo tên chương trình là vi du D.Khai báo tên chương trình là vi_du

Câu 4 Phát biểu nào sau đây có thể lấy làm biểu thức điều kiện trong cấu trúc rẽ nhánh ?

A. "A nho hon B" B. "false" C. 100 > 99 D. "A > B"

Câu 5 Trường hợp nào dưới đây là tên biến trong Pascal ?

Câu 6. **Hãy chọn phương án ghép đúng Biểu thức : 25 div 5 + 5 / 2 * 3 có giá trị là :

Câu 7. Để chạy chương trình ta dùng phím:

Câu 8. Đoạn chương trình sau C cho kết quả bao nhiêu?

A:=0; B:=0;

Trang 2

IF a>0 then

A:=1

ELSE

C:=A+B;

Câu 9. Biểu thức (sqrt(25) div 4) có kết quả là mấy:

Câu 10. **Cho x là biến thực đã được gán giá trị 469.5632 Để thực hiện lên màn hình nội dung

"x=469.563" cần chọn câu lệnh nào sau đây ?

A.Writeln(x:7:3); B.Writeln('x=',x:7); C.Writeln(x); D.Writeln('x=' ,x:7:3);

Câu 11 Var a, N : integer ;

BEGIN

N := 645 ;

A := N mod 10 ;

N := N div 10 ;

IF N<65 THEN A := A + N div 10 ;

IF A>7 THEN A := A + N mod 10 ;

Write(a);

END.

Ta thu được kết quả nào ?

Câu 12 Cho một chương trình còn lỗi như sau :

Var

A, b, c : real ;

A := 1; b := 1; c := 5 ;

d := b*b - 4*a*c ;

writeln('d = ',d);

Tìm kết luận đúng nhất về lỗi của chương trình trong các kết luận sau :

Câu 13 Để xác định một điểm có tọa độ (x,y) nằm ngoài đường tròn tâm (a,b) bán kính R ta dùng biểu thức logic:

A.sqrt(sqr(x-a)+sqr(y-b))<=R B. (x-a)+(y-b)>R

Câu 14 Cho khai báo biến sau đây (trong Pascal) :

Var m, n : integer ;

x, y : real ;

Lệnh gán nào sau đây là sai ?

Câu 15 Trường hợp nào sau đây không phải là lệnh gán trong Pascal ?

Câu 16. Câu lệnh nào sau đây là đúng:

A. If a>0 then a:=0 else a:=1; B. If a>0; then a:=0

C. If a>0 then a:=0; else a:=1 D. If a>0 then a:=0 else a:=1

Câu 17 Trong Pascal, phát biểu nào sau đâu là đúng

A.Trước END bắt buộc phải có chấm phẩy B.Các lệnh phải phân biệt chữ hoa và chữ thường

C.Sau mỗi câu lệnh đều có chấm phẩy D.Trước lệnh ELSE không có chấm phẩy

Câu 18. trong các từ sau từ nào là từ khóa:

Trang 3

Câu 19 Đọan chương trình sau cho ra kết quả gì?

A:=0;

If a>0 then a:=1;

Writeln(a);

Câu 20. Đoạn chương trình sau có mấy lỗi:

IF a 0 then a:=1;

Else a:=2

PHẦN TỰ LUẬN: (5 điểm)

Câu 1: Viết chương trình nhập vào từ bàn phím 2 số thưc p ,q sau đó đổi giá trị của số lớn hơn bằng tổng

của p và q.(2đ)

Câu 2: Viết chương trình nhập vào từ bàn phím 2 số nguyên m ,k (m<k) sau đó tính tích của các số chẵn

trong phạm vi từ m đến k và in kết quả ra màn hình.(3đ)

BÀI LÀM

………

Trang 4

………

Trang 5

01 ; / = ~ 06 ; / = ~ 11 ; / = ~ 16 ; / = ~

02 ; / = ~ 07 ; / = ~ 12 ; / = ~ 17 ; / = ~

03 ; / = ~ 08 ; / = ~ 13 ; / = ~ 18 ; / = ~

04 ; / = ~ 09 ; / = ~ 14 ; / = ~ 19 ; / = ~

05 ; / = ~ 10 ; / = ~ 15 ; / = ~ 20 ; / = ~

Mã đề: 168 Câu 1. Câu lệnh nào sau đây là đúng:

A. If a>0 then a:=0; else a:=1 B. If a>0; then a:=0

C. If a>0 then a:=0 else a:=1 D. If a>0 then a:=0 else a:=1;

Else a:=2

A. "false" B. "A nho hon B" C. "A > B" D. 100 > 99

A:=0; B:=0;

IF a>0 then

A:=1

ELSE

C:=A+B;

Câu 7 Kết quả đoạn chương trình sau khi nhập a=0, b=1

IF a=0 then

IF b=0 then

Writeln('VSN') Else

Writeln('VN') Else

Writeln(-b/a:10:2);

Var

A, b, c : real ;

A := 1; b := 1; c := 5 ;

d := b*b - 4*a*c ;

Trang 6

A:=0;

If a>0 then a:=1;

Writeln(a);

x, y : real ;

PROGRAM vi_du;

BEGIN

END.

A.Khai báo tên chương trình là vi du B. Chương trình không có khai báo hằng

C.Thân chương trình có hai câu lệnh D.Khai báo tên chương trình là vi_du

A.Writeln('x=',x:7); B.Writeln(x); C.Writeln(x:7:3); D.Writeln('x=' ,x:7:3);

A.sqrt(sqr(x-a)+sqr(y-b))<=R B.sqrt(sqr(x-a)+sqr(y-b))>R

BEGIN

N := 645 ;

A := N mod 10 ;

N := N div 10 ;

Write(a);

END.

Trang 7

A:=0;

If a>0 then

X:=1;

Y:=2

Else

X:=2

Writeln(x);

A.Trước END bắt buộc phải có chấm phẩy B.Các lệnh phải phân biệt chữ hoa và chữ thường

C.Trước lệnh ELSE không có chấm phẩy D.Sau mỗi câu lệnh đều có chấm phẩy

PHẦN TỰ LUẬN: (5 điểm)

Câu 1: Viết chương trình nhập vào từ bàn phím 2 số thưc p ,q sau đó đổi giá trị của số lớn hơn bằng tổng

của p và q.(2đ)

Câu 2: Viết chương trình nhập vào từ bàn phím 2 số nguyên m ,k (m<k) sau đó tính tích của các số chẵn

trong phạm vi từ m đến k và in kết quả ra màn hình.(3đ)

BÀI LÀM

………

Trang 8

………

01 ; / = ~ 06 ; / = ~ 11 ; / = ~ 16 ; / = ~

02 ; / = ~ 07 ; / = ~ 12 ; / = ~ 17 ; / = ~

03 ; / = ~ 08 ; / = ~ 13 ; / = ~ 18 ; / = ~

04 ; / = ~ 09 ; / = ~ 14 ; / = ~ 19 ; / = ~

05 ; / = ~ 10 ; / = ~ 15 ; / = ~ 20 ; / = ~

Mã đề: 202 Câu 1 Đọan chương trình sau khi chạy cho kết quả gì?

A:=0;

If a>0 then

X:=1;

Y:=2

Else

X:=2

Writeln(x);

A.sqrt(sqr(x-a)+sqr(y-b))>R B. (x-a)+(y-b)>R

C.sqrt(sqr(x-a)+sqr(y-b))<=R D.(x-a)2+(y-b)2>R2

A. "false" B. "A nho hon B" C. 100 > 99 D. "A > B"

A:=0; B:=0;

IF a>0 then

A:=1

ELSE

C:=A+B;

x, y : real ;

Trang 9

A. 2 B. 1 C. 4 D. 3

PROGRAM vi_du;

BEGIN

END.

A.Khai báo tên chương trình là vi du B.Khai báo tên chương trình là vi_du

C. Chương trình không có khai báo hằng D.Thân chương trình có hai câu lệnh

Var

A, b, c : real ;

A := 1; b := 1; c := 5 ;

d := b*b - 4*a*c ;

A:=0;

If a>0 then a:=1;

Writeln(a);

IF a=0 then

IF b=0 then

Writeln('VSN') Else

Writeln('VN') Else

Writeln(-b/a:10:2);

Else a:=2

A.Sau mỗi câu lệnh đều có chấm phẩy B.Trước END bắt buộc phải có chấm phẩy

có chấm phẩy

A. If a>0 then a:=0 else a:=1 B. If a>0 then a:=0 else a:=1;

C. If a>0 then a:=0; else a:=1 D. If a>0; then a:=0

Trang 10

BEGIN

N := 645 ;

A := N mod 10 ;

N := N div 10 ;

Write(a);

END.

A.Writeln(x); B.Writeln('x=',x:7); C.Writeln('x=' ,x:7:3); D.Writeln(x:7:3);

PHẦN TỰ LUẬN: (5 điểm)

Câu 1: Viết chương trình nhập vào từ bàn phím 2 số thưc a ,b sau đó in ra màn hình giá trị của số lớn hơn.

(2đ)

Câu 2: Viết chương trình nhập vào từ bàn phím 2 số nguyên x ,y (x<y) sau đó tính tích của các số âm trong

phạm vi từ x đến y và in kết quả ra màn hình.(3đ)

BÀI LÀM

………

Trang 11

01 ; / = ~ 06 ; / = ~ 11 ; / = ~ 16 ; / = ~

02 ; / = ~ 07 ; / = ~ 12 ; / = ~ 17 ; / = ~

03 ; / = ~ 08 ; / = ~ 13 ; / = ~ 18 ; / = ~

04 ; / = ~ 09 ; / = ~ 14 ; / = ~ 19 ; / = ~

05 ; / = ~ 10 ; / = ~ 15 ; / = ~ 20 ; / = ~

Mã đề: 236 Câu 1 Cho một chương trình còn lỗi như sau :

Var

A, b, c : real ;

A := 1; b := 1; c := 5 ;

d := b*b - 4*a*c ;

Else a:=2

A.Sau mỗi câu lệnh đều có chấm phẩy B.Các lệnh phải phân biệt chữ hoa và chữ thường

C.Trước END bắt buộc phải có chấm phẩy D.Trước lệnh ELSE không có chấm phẩy

BEGIN

N := 645 ;

A := N mod 10 ;

N := N div 10 ;

Write(a);

END.

A.sqrt(sqr(x-a)+sqr(y-b))>R B.sqrt(sqr(x-a)+sqr(y-b))<=R

Trang 12

C. (x-a)+(y-b)>R D.(x-a)2+(y-b)2>R2

A:=0;

If a>0 then

X:=1;

Y:=2

Else

X:=2

Writeln(x);

A:=0; B:=0;

IF a>0 then

A:=1

ELSE

C:=A+B;

A. "false" B. "A nho hon B" C. "A > B" D. 100 > 99

A.Writeln('x=' ,x:7:3); B.Writeln(x); C.Writeln(x:7:3); D.Writeln('x=',x:7);

x, y : real ;

A. If a>0 then a:=0 else a:=1 B. If a>0 then a:=0; else a:=1

C. If a>0 then a:=0 else a:=1; D. If a>0; then a:=0

A:=0;

If a>0 then a:=1;

Writeln(a);

IF a=0 then

IF b=0 then

Writeln('VSN') Else

Writeln('VN') Else

Writeln(-b/a:10:2);

Trang 13

PROGRAM vi_du;

BEGIN

END.

A.Khai báo tên chương trình là vi_du B.Khai báo tên chương trình là vi du

C.Thân chương trình có hai câu lệnh D. Chương trình không có khai báo hằng

PHẦN TỰ LU Ậ N: (5 điểm)

Câu 1: Viết chương trình nhập vào từ bàn phím 2 số thưc a ,b sau đó in ra màn hình giá trị của số lớn hơn.

(2đ)

Câu 2: Viết chương trình nhập vào từ bàn phím 2 số nguyên x ,y (x<y) sau đó tính tích của các số âm trong

phạm vi từ x đến y và in kết quả ra màn hình.(3đ)

BÀI LÀM

………

Tiêu đề	Kiểm Tra Một Tiết HKI
Trường học	Trường Đại học Sư phạm Hà Nội
Chuyên ngành	Môn: Tin học 11
Thể loại	kiểm tra
Thành phố	Hà Nội

Định dạng
Số trang	14
Dung lượng	104 KB