Muốn dùng biến X lưu giá trị nhỏ nhất trong các giá trị của hai biến A, B có thể dùng cấu trúc rẽ nhánh như sau : A.if A..[r]
(1)TRƯỜNG THPT LÊ XOAY ĐỀ THI KIỂM TRA HỌC KỲ MÔN TIN HỌC 11 (Thời gian làm bài: 45 phút) Câu 1: cho a=1, b=1; hãy cho biết t nhận giá trị nào kết thúc đoạn chương trình sau: a:=b+1; b:=a; If a=b Then t:=a+b+1 Họ và tên: Else t:=a+b-1; Lớp: A B C D đoạn chương trình báo lỗi Câu 2: Điều kiện 10<x<15, Pascal tách nào? Điểm: A (10<x) Or (x<15) C.(10<x) Not (x<15) B (10<x) And (x<15) D Cả A,B,C sai; Câu 3: Kiểu Boolean và Byte có cùng kích thước với kiểu liệu nào? A Char; B Real; C Word; D Cả A,B,C sai; ¿ ¿ x∨+¿ y∨¿ x − y Câu 4: Cho bài toán: Tính và xuất màn hình giá trị Z với ¿ Z ={ ¿ Hãy cho biết, cần sử dụng cấu trúc nào (nếu x=>y x<y)? A Rẽ nhánh; C Lặp với số lần không biết trước; B Lặp với số lần biết trước dạng lùi; D Lặp với số lần biết trước dạng tiến; Câu 5: Trong cú pháp câu lệnh If-Then, điều kiện là: A biểu thức lôgic C câu lệnh gán B biểu thức toán học D Cả A,B,C sai Câu 6: Kiểu Real có kích thức bao nhiêu byte? A B C D.10 Câu 7:Những thông tin nào không phải là thành phần ngôn ngữ lập trình? A Cú pháp; C Ngữ nghĩa và bảng chữ cái B Biến và D Cả A,B,C sai; Câu 8: Tên sai ngôn ngữ lập trình Pascal là: A 5pr; B _43; C p21 D oloha; Câu 9: Hàm Sqr áp dụng cho các đối số có kiểu là: A số thực; B số nguyên; C Cả A,B đúng; D Cả A,B sai; Câu 10: Kiểu liệu chuẩn sử dụng để làm gì? A Khai báo biến; C Diễn đạt thuật toán; B Mô tả biểu thức; D Viết chương trình; Câu 11: cho đoạn chương trình sau: S:=3; For i:=1 To Do If i mod 2=0 Then S:=S+I; Hãy cho biết s nhận giá trị nào? A B C 18 D Cả A,B,C sai Câu 12: thông tin nào không phải là số học? A -2.23E01; B 54 C -23.25 D ‘45’ Câu 13: Biểu thức nhận giá trị là True False là: A Toán học thực và lôgic; C Lôgic và quan hệ; B Toán học và lôgic; D Quan hệ và Toán học; Câu 14: Cho chương trình sau: Var t: text; d:real; x,y:integer; Begin Assign(t,‘dulieu.txt’); Reset(t); While not eof(t) Do Begin Read(t,x,y); d:=sqrt(x*x+y*y); Writeln(‘ket qua =’, d:5:2); (2) End; Close(t); Readln; End Sau thực chương trình, màn hình có nội dung nào tệp ‘dulieu.txt’ chứa thông tin sau: 4 3? ketqua = 5.00 ketqua = 5.00 B ketqua =25.00 C ketqua =25.00 D ketqua =25.00 ketqua = 5.00 ketqua =25.00 ketqua = 5.00 Câu 15: Muốn sử dụng thủ tục xóa màn hình (Clrscr) ta phải khai báo thư viện nào? A Type Use; B Type Uses; C Uses Crt; D Uses Ctr; Câu 16: Phần mở rộng Pascal là: A (.txt); B (.dos); C (.pas); D (.xls); Câu 17: Thủ tục để nhập liệu vào biến là: A Write và Readln; B Read và Writeln; C Writeln và Write; D Readln và Read; Câu 18: Xét biểu thức (m mod <>0) And (m div >=5) Với giá trị nào m đây để biểu thức trên cho giá trị là True? A B 500 C 455 D Câu 19: Biến N nhận giá trị là ‘1’ và ‘0’ Hãy cho biết khai báo nào sau đây là đúng A Var N:Char; B Var N:Byte; C Var N: Boolean D Var N:Real; Câu 20: Hàm tính bậc P là: A Abs(P); B Sqr(P); C Srq(P); D Sqrt(P); Câu 21: Biểu thức (2*2<1+1) Or (Abs(-3)<=3) Pascal nhận giá trị: A Đúng B Sai C True D False Câu 22: Hãy chọn kiểu liệu có kích thước nhớ lớn các kiểu sau: A Integer; B Byte; C Longint; D Real; Câu 23: Cho s,i,n là số nguyên dương Câu lệnh tính s=n! là: A s:=1; For i:=1 To n Do s:=s*i; C s:=1; For i:=1 To n Do s:=s*n; B s:=0; For i:=1 To n Do s:=s*i; D s:=1; For i:=1 To n Do s:=s+i; Câu 24: Đoạn chương trình nào thu giá trị biến s = 10? A A s:=5; s:=s*s; write(s); B s:=5; s:=s+s; write(s); C s:=10; s:=s*s; write(s); D s:=10; s:=s+s; write(s); Câu 25: Biến t có thể nhận các giá trị là 1; 100; 12.55; -46.1; Có thể khai báo biến t có kiểu là: A Integer và Real; B Byte và Integer; C Real và Byte; D Real; Câu 26: Biết a,b,c là độ dài cạnh tam giác, biểu thức a+b>c Pascal cho giá trị là: A True B False Câu 27:Phát biểu nào sau đây có thể lấy làm biểu thức điều kiện cấu trúc rẽ nhánh ? A.100 > 99 B.“A > B” C.“A nhỏ B” D.“false” Câu 28: Hãy chọn cách dùng sai Muốn dùng biến X lưu giá trị nhỏ các giá trị hai biến A, B có thể dùng cấu trúc rẽ nhánh sau : A.if A <= B then X := A else X := B; B.if A < B then X := A; (*) C.X := B; if A < B then X := A; D.if A < B then X := A else X := B; Câu 29: Trường hợp nào sau đây không phải là lệnh gán Pascal ? A.a := 10 ; B.a + b := 1000 ; C.cd := 50 ; D.a := a*2 ; Câu 30: Hãy chọn phương án ghép đúng Biểu thức : 25 div + / * có giá trị là : A.8.0; B.15.5; C.15.0; D.8.5; Hết (3) (4)