Kiểm tra tin 11

Kiểm tra học kì i Kiểm tra học kì i Môn: Tin Học - 11 Họ và tên: Lớp: . Cõu 1: Cho đoạn chơng trình sau: Begin Clrscr; Write(nhap a, b: ); readln(a, b); C := a; If a<b Then C:= b; Writeln(C: ,C); Readln; End. 1. Hãy cho biết giá trị của C sau khi thực hiện đoạn chơng trình trên với a=15 và b=18. Kết quả bằng bao nhiêu? A. C = 18 B. C nhận cả hai giá trị trên C. C không nhận giá trị nào D. C := 15 2. Hãy cho biết giá trị của C sau khi thực hiện đoạn chơng trình trên với a=12 và b=8. kết quả bằng bao nhiêu? A. C = 10 B. C = 12 C. C = 8 D. C = 20 Cõu 2: Trong ngôn ngữ lập trình Pascal câu lệnh nào sau đây là đúng? A. While <điều kiện> do <câu lệnh 1>; B. While <điều kiện> do <câu lệnh>; C. While <điều kiện>; do <câu lệnh>; D. While := <điều kiện> do <câu lệnh>; Cõu 3: Trong ngôn ngữ lập trình Pascal câu lệnh nào sau đây là đúng? A. Var a, b; integer; B. Var m, n: byte C. Var x, y:= real; D. Var g, h: word; Cõu 4: Hãy chỉ ra câu lệnh đúng về cấu trúc của câu lệnh ghép? A. Begin end; B. Begin end. C. Begin end D. If then else Cõu 5: Trong ngôn ngữ lập trình Pascal câu lệnh nào sau đây là đúng? A. Const h := 14; B. Const b =: 10; C. Const a = 15; D. Const a: 15 Cõu 6: Trong ngôn ngữ lập trình Pascal câu lệnh nào sau đây là đúng? A. for <biến đếm>:= <giá trị đầu> to <giá trị cuối>: do <câu lệnh>; B. for <biến đếm>:= <giá trị đầu> to <giá trị cuối> downto <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ị đầu> to <giá trị cuối> do <câu lệnh>; Cõu 7: Trong ngôn ngữ lập trình Pascal câu lệnh nào sau đây là đúng? A. if <điều kiện> then; <câu lệnh 1> else <câu lệnh 2>; B. if <điều kiện>; then <câu lệnh 1> else <câu lệnh 2>; 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 1> else <câu lệnh 2>; Cõu 8: Trong ngôn ngữ lập trình Pascal câu lệnh nào sau đây là đúng? A. for <biến đếm>:= <giá trị đầu> downto <giá trị cuối> do <câu lệnh>; B. for <biến đếm>:= <giá trị cuối> downto <giá trị đầu> do <câu lệnh>: C. for <biến đếm>:= <giá trị cuối> to <giá trị đầu> do <câu lệnh>; D. for <biến đếm>=: <giá trị đầu> downto <giá trị cuối> do <câu lệnh>; Cõu 9: Trong ngôn ngữ lập trình Pascal câu lệnh nào sau đây là đúng? A. if <điều kiện>; then <câu lệnh>; B. if <điều kiện> then; <câu lệnh> C. if <điều kiện> then <câu lệnh>; D. if <điều kiện> then <câu lệnh> M 1 Câu 10: Hãy chỉ ra lỗi trong chơng trình sau: ----------------------------------------------- Program bai tap10; (*dòng 1*) Uses crt; (*dòng 2*) Var z, x y:real; (*dòng 3*) Begin (*dòng 4*) clrscr; (*dòng 5*) Writ(nhap x, y: ); readln(x, y); (*dòng 6*) if ((sqr(x)+sqr(y))<=1) then z:=(sqr(x)+sqr(y); (*dòng 7*) if ((sqr(x)+sqr(y))>1) and (y>=x) than z:=x+y; (*dòng 8*) if ((sqr(x)+sqr(y))>1) and (y<x) then z:=0.5 (*dòng 9*) Write(z,z:8:2); (*dòng 10*) readln; (*dòng 11*) end. (*dòng 12*) Câu 11: Viết chơng trình nhập vào từ bàn phím bốn số thực a, b, c, d. Hãy tìm giá trị cực đại Max của bốn số đó. ----------------------------------------------- M 1 . Kiểm tra học kì i Kiểm tra học kì i Môn: Tin Học - 11 Họ và tên: . then z:=0.5 (*dòng 9*) Write(z,z:8:2); (*dòng 10*) readln; (*dòng 11* ) end. (*dòng 12*) Câu 11: Viết chơng trình nhập vào từ bàn phím bốn số thực a, b, c,