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/3 - Mã đề: 134 Kiểm tra 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 toán hay trả lời ngắn gọn câu hỏi vào dòng trống tương ứ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 Kết đoạn chương trình sau nhập a=0, b=1 IF a=0 then IF b=0 then Else Writeln('VSN') Writeln('VN') Else Writeln(-b/a:10:2); A.VSN B.0 C.Chương trình sai D.VN Câu Đọan chương trình sau chạy cho kết gì? A:=0; If a>0 then X:=1; Y:=2 Else X:=2 Writeln(x); A Chương trình báo lỗi B C D Câu Xét chương trình Pascal cho khung : 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 phát biểu : A.Thân chương trình có hai câu lệnh B Chương trình khơng có khai báo C.Khai báo tên chương trình vi du D.Khai báo tên chương trình vi_du Câu Phát biểu sau lấy làm biểu thức điều kiện cấu trúc rẽ nhánh ? A "A nho hon B" B "false" C 100 > 99 D "A > B" Câu Trường hợp tên biến Pascal ? A.Ngay_sinh; B.Giai-Ptrinh-Bac 2; C.2x; D._Noi sinh; Câu **Hãy chọn phương án ghép Biểu thức : 25 div + / * có giá trị : A.8.0 B.12.5 C.15.0 D.8.5 Câu Để chạy chương trình ta dùng phím: A Alt-X B Ctrl-F9 C F9 D Shift-F9 Câu Đoạn chương trình sau C cho kết bao nhiêu? A:=0; B:=0; Trang 1/3 - Mã đề: 134 IF a>0 then A:=1 ELSE Begin A:=2; B:=1; End C:=A+B; A B C.3 D Câu Biểu thức (sqrt(25) div 4) có kết mấy: A B C D Câu 10 **Cho x biến thực gán giá trị 469.5632 Để thực lên hình nội dung "x=469.563" cần chọn câu lệnh sau ? 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 N7 THEN A := A + N mod 10 ; Write(a); END Ta thu kết ? A.64 B.65 C.69 D.58 Câu 12 Cho chương trình cịn lỗi sau : Var A, b, c : real ; A := 1; b := 1; c := ; d := b*b - 4*a*c ; writeln('d = ',d); Tìm kết luận lỗi chương trình kết luận sau : A.Thiếu Begin B.Thiếu Begin khơng khai biến d C Khơng có END D.Khơng khai báo biến d Câu 13 Để xác định điểm có tọa độ (x,y) nằm ngồ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 2 C.(x-a) +(y-b) >R D.sqrt(sqr(x-a)+sqr(y-b))>R Câu 14 Cho khai báo biến sau (trong Pascal) : Var m, n : integer ; x, y : real ; Lệnh gán sau sai ? A.y := +10.5 ; B.x := ; C.n := 3.5 ; D.m := -4 ; Câu 15 Trường hợp sau lệnh gán Pascal ? A.a := a*2 ; B.cd := 50 ; C.a+b := 1000 ; D.a := 10 ; Câu 16 Câu lệnh sau đú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 sau đâu 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 chữ thường C.Sau câu lệnh có chấm phẩy D.Trước lệnh ELSE khơng có chấm phẩy Câu 18 từ sau từ từ khóa: A READ B BYTE C IF D LOP Trang 1/3 - Mã đề: 134 Câu 19 Đọan chương trình sau cho kết gì? A:=0; If a>0 then a:=1; Writeln(a); A Báo lỗi khơng có Else Câu 20 Đoạn chương trình sau có lỗi: IF a then a:=1; Else a:=2 A B B C khơng C D D 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 số thưc p ,q sau đổi giá trị số lớn tổng p q.(2đ) Câu 2: Viết chương trình nhập vào từ bàn phím số ngun m ,k (m0 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 Trường hợp tên biến Pascal ? A.Giai-Ptrinh-Bac 2; B.Ngay_sinh; C.2x; D._Noi sinh; Câu Đoạn chương trình sau có lỗi: IF a then a:=1; Else a:=2 A B C D Câu Phát biểu sau lấy làm biểu thức điều kiện cấu trúc rẽ nhánh ? A "false" B "A nho hon B" C "A > B" D 100 > 99 Câu Đoạn chương trình sau C cho kết bao nhiêu? A:=0; B:=0; IF a>0 then A:=1 ELSE Begin A:=2; B:=1; End C:=A+B; A B.3 C D Câu Biểu thức (sqrt(25) div 4) có kết mấy: A B C D Câu Kết đoạn chương trình sau 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); A.Chương trình sai B.VN C.VSN D.0 Câu Cho chương trình cịn lỗi sau : Var A, b, c : real ; A := 1; b := 1; c := ; d := b*b - 4*a*c ; writeln('d = ',d); Trang 1/3 - Mã đề: 134 Tìm kết luận lỗi chương trình kết luận sau : A.Thiếu Begin B.Không khai báo biến d C Khơng có END D.Thiếu Begin khơng khai biến d Câu Để chạy chương trình ta dùng phím: A Ctrl-F9 B F9 C Alt-X D Shift-F9 Câu 10 Đọan chương trình sau cho kết gì? A:=0; If a>0 then a:=1; Writeln(a); A Báo lỗi khơng có Else B khơng C D Câu 11 Cho khai báo biến sau (trong Pascal) : Var m, n : integer ; x, y : real ; Lệnh gán sau sai ? A.x := ; B.y := +10.5 ; C.m := -4 ; D.n := 3.5 ; Câu 12 **Hãy chọn phương án ghép Biểu thức : 25 div + / * có giá trị : A.8.0 B.12.5 C.15.0 D.8.5 Câu 13 Xét chương trình Pascal cho khung : 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 phát biểu : A.Khai báo tên chương trình vi du B Chương trình khơng có khai báo C.Thân chương trình có hai câu lệnh D.Khai báo tên chương trình vi_du Câu 14 **Cho x biến thực gán giá trị 469.5632 Để thực lên hình nội dung "x=469.563" cần chọn câu lệnh sau ? A.Writeln('x=',x:7); B.Writeln(x); C.Writeln(x:7:3); D.Writeln('x=' ,x:7:3); Câu 15 Để xác định điểm có tọa độ (x,y) nằm ngồ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 2 C.(x-a) +(y-b) >R D (x-a)+(y-b)>R Câu 16 Trường hợp sau lệnh gán Pascal ? A.a := a*2 ; B.cd := 50 ; C.a+b := 1000 ; D.a := 10 ; Câu 17 từ sau từ từ khóa: A LOP B IF C BYTE D READ Câu 18 Var a, N : integer ; BEGIN N := 645 ; A := N mod 10 ; N := N div 10 ; IF N7 THEN A := A + N mod 10 ; Write(a); END Ta thu kết ? A.64 B.65 C.58 D.69 Trang 1/3 - Mã đề: 134 Câu 19 Đọan chương trình sau chạy cho kết gì? A:=0; If a>0 then X:=1; Y:=2 Else X:=2 Writeln(x); A B C Chương trình báo lỗi D Câu 20 Trong Pascal, phát biểu sau đâu 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 chữ thường C.Trước lệnh ELSE khơng có chấm phẩy D.Sau câu lệnh 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 số thưc p ,q sau đổi giá trị số lớn tổng p q.(2đ) Câu 2: Viết chương trình nhập vào từ bàn phím số ngun m ,k (m0 then X:=1; Y:=2 Else X:=2 Writeln(x); A B C Chương trình báo lỗi D Câu Để chạy chương trình ta dùng phím: A Ctrl-F9 B F9 C Shift-F9 D Alt-X Câu Trường hợp tên biến Pascal ? A.2x; B._Noi sinh; C.Ngay_sinh; D.Giai-Ptrinh-Bac 2; Câu Để xác định điểm có tọa độ (x,y) nằm ngồ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.sqrt(sqr(x-a)+sqr(y-b))R2 Câu **Hãy chọn phương án ghép Biểu thức : 25 div + / * có giá trị : A.12.5 B.8.0 C.15.0 D.8.5 Câu Phát biểu sau lấy làm biểu thức điều kiện cấu trúc rẽ nhánh ? A "false" B "A nho hon B" C 100 > 99 D "A > B" Câu Đoạn chương trình sau C cho kết bao nhiêu? A:=0; B:=0; IF a>0 then A:=1 ELSE Begin A:=2; B:=1; End C:=A+B; A B.3 C D Câu Cho khai báo biến sau (trong Pascal) : Var m, n : integer ; x, y : real ; Lệnh gán sau sai ? A.m := -4 ; B.y := +10.5 ; C.n := 3.5 ; D.x := ; Câu Biểu thức (sqrt(25) div 4) có kết mấy: Trang 1/3 - Mã đề: 134 A B C Câu 10 Xét chương trình Pascal cho khung : D 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 phát biểu : A.Khai báo tên chương trình vi du B.Khai báo tên chương trình vi_du C Chương trình khơng có khai báo D.Thân chương trình có hai câu lệnh Câu 11 Cho chương trình cịn lỗi sau : Var A, b, c : real ; A := 1; b := 1; c := ; d := b*b - 4*a*c ; writeln('d = ',d); Tìm kết luận lỗi chương trình kết luận sau : A.Khơng khai báo biến d B.Thiếu Begin C Khơng có END D.Thiếu Begin không khai biến d Câu 12 từ sau từ từ khóa: A BYTE B LOP C READ D IF Câu 13 Đọan chương trình sau cho kết gì? A:=0; If a>0 then a:=1; Writeln(a); A B khơng C Báo lỗi khơng có Else D Câu 14 Kết đoạn chương trình sau 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); A.VN B.Chương trình sai C.VSN D.0 Câu 15 Đoạn chương trình sau có lỗi: IF a then a:=1; Else a:=2 A B C D Câu 16 Trong Pascal, phát biểu sau đâu A.Sau câu lệnh có chấm phẩy B.Trước END bắt buộc phải có chấm phẩy C.Các lệnh phải phân biệt chữ hoa chữ thường D.Trước lệnh ELSE khơng có chấm phẩy Câu 17 Câu lệnh sau đúng: 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 Câu 18 Trường hợp sau lệnh gán Pascal ? A.cd := 50 ; B.a := 10 ; C.a+b := 1000 ; D.a := a*2 ; Trang 1/3 - Mã đề: 134 Câu 19 Var a, N : integer ; BEGIN N := 645 ; A := N mod 10 ; N := N div 10 ; IF N7 THEN A := A + N mod 10 ; Write(a); END Ta thu kết ? A.69 B.58 C.64 D.65 Câu 20 **Cho x biến thực gán giá trị 469.5632 Để thực lên hình nội dung "x=469.563" cần chọn câu lệnh sau ? 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 số thưc a ,b sau in hình giá trị số lớn (2đ) Câu 2: Viết chương trình nhập vào từ bàn phím số ngun x ,y (xR B.sqrt(sqr(x-a)+sqr(y-b))R D.(x-a) +(y-b) >R Câu Đọan chương trình sau chạy cho kết gì? 2 A:=0; If a>0 then X:=1; Y:=2 Else X:=2 Writeln(x); A B Chương trình báo lỗi C D Câu 10 Đoạn chương trình sau C cho kết bao nhiêu? A:=0; B:=0; IF a>0 then A:=1 ELSE Begin A:=2; B:=1; End C:=A+B; A B.3 C D Câu 11 Phát biểu sau lấy làm biểu thức điều kiện cấu trúc rẽ nhánh ? A "false" B "A nho hon B" C "A > B" D 100 > 99 Câu 12 **Cho x biến thực gán giá trị 469.5632 Để thực lên hình nội dung "x=469.563" cần chọn câu lệnh sau ? A.Writeln('x=' ,x:7:3); B.Writeln(x); C.Writeln(x:7:3); D.Writeln('x=',x:7); Câu 13 Cho khai báo biến sau (trong Pascal) : Var m, n : integer ; x, y : real ; Lệnh gán sau sai ? A.n := 3.5 ; B.m := -4 ; C.x := ; D.y := +10.5 ; Câu 14 Câu lệnh sau đúng: 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 Câu 15 Đọan chương trình sau cho kết gì? A:=0; If a>0 then a:=1; Writeln(a); A B khơng C D Báo lỗi khơng có Else Câu 16 Kết đoạn chương trình sau 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); A.VN B.Chương trình sai C.0 D.VSN Câu 17 Trường hợp sau lệnh gán Pascal ? A.cd := 50 ; B.a := a*2 ; C.a+b := 1000 ; D.a := 10 ; Câu 18 Biểu thức (sqrt(25) div 4) có kết mấy: A B C D Trang 1/3 - Mã đề: 134 Câu 19 **Hãy chọn phương án ghép Biểu thức : 25 div + / * có giá trị : A.12.5 B.15.0 C.8.5 D.8.0 Câu 20 Xét chương trình Pascal cho khung : 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 phát biểu : A.Khai báo tên chương trình vi_du B.Khai báo tên chương trình 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 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 số thưc a ,b sau in hình giá trị số lớn (2đ) Câu 2: Viết chương trình nhập vào từ bàn phím số ngun x ,y (x