TRƯỜNG THPT PHAN BỘI CHÂU KIỂM TRA TIẾT HKI - TIN HỌC 11 2016-2017 Câu 1: Cho hai biến nguyên x,y thoả 10 x,y 15 S = x/y S khai báo tốt nhất? A Var s: longint; B Var s: word; C Var s: integer; D Var s: real; Câu 2: Câu lệnh sau pascal? A X:= 2(A- B); B Writeln(‘X=’; A+B); C X = A+ B; D Writeln(‘X= A+ B’); Câu 3: Với lệnh sau dùng để in giá trị M(M kiểu số thực) hình với độ rộng có chữ số phần thập phân ? B Writeln(M:2:5); C Write(M:5); D Writeln(M:2); A Write(M:5:2); Câu 4: Trong từ sau, từ từ khóa pascal? A Writeln B Readln C Sqr D Const Câu 5: Để nhập giá trị cho hai biến nguyên x,y từ bàn phím ta sử dụng thủ tục sau đây? A Readln(x,y); B Writeln(‘ x ‘, ‘ y ‘); C Writeln(x,y); D Readln(‘x, y’); Câu 6: Cho biểu thức A: = 3*abs(3*x-y) + sqr(x-1)*2, x,y nhận giá trị 3; kết thu là: A 54 B 12 + 2 C 20 D 48 + 2 Câu 7: Biến y nhận giá trị :- 15 biến x nhận giá trị: -10.5 khai báo sau ? A Var x: byte; y : real; B Var x: word; y: real; C Var x,y : integer; D Var x,y: real; Câu 8: Muốn kiểm tra đồng thời ba giá trị a, b, c có lớn hay không ta viết câu lệnh If: A If a>0, b>0, c>0 then B If (a>0) or (b>0) or (c>0) then C If (a>0) and (b>0) and (c>0) then D If a,b,c>0 then Câu 9: S := ; i:= 0; m:= 4; WHILE i < = m DO BEGIN i := i + 1;S:= S + i; END; Cho kết quả: A S= 10 B S=6 C S= D S= 15 Câu 10: Cho đoạn CT: Kq:=0; For i:=1 to Kq:=Kq*i; Kết sau chạy : A B 120 C 60 D 20 Câu 11: Trong Turbo Pascal để biên dịch chương trình ta sử dụng tổ hợp phím: A Shift + F9 B Alt + F9 C Alt + X D Ctrl + F9 Câu 12: S:=1; n:=2; While s y THEN F:= 2*x – y ELSE IF x=y THEN F:= 2*x ELSE F:= x*x + y*y ; Sau thực CT, giá trị F là: A F =1 B F=13 C F=4 D Không xác định Câu 21: Cho đoạn lệnh: K:=10; While (K>5) K:=K-2; Write(K); Kết xuất hình là: A B C 10 D 10 Câu 22: Cho biết đoạn chương trình thực tính tổng gì? S := 1;FOR i := TO 10 DO S := S + / i; 1 10 1 C Tính tổng: S 10 A Tính tổng: S Câu 23: A Câu 24: A B Tính tổng: S 10 D Tính tổng: S 1 10 Cho biểu thức A: = 3*abs(x-y) + sqr(x+1)*2, x,y nhận giá trị 4; kết thu là: 12 + B 56 C 6+2 D 58 a:= 2; while a 0) AND (i MOD = 0) THEN T := T + i; Đoạn CT dùng để: A Tính tổng tất số có chữ số số lẻ chia hết cho B Tính tổng tất số lẻ có chữ số C Tính tổng tất số tự nhiên có chữ số D Tính tổng tất số có chữ số số chẵn chia hết cho x Pascal ta biểu diễn biểu thức sau ? x A ( x) or ( x