KIỂM TRA HỌC KỲ I MƠN TIN HỌC LỚP 11. Câu1: Trong Ngơn ngữ lập trình PasCal, với câu lệnh sau: Write(‘KQ la:’, a); sẽ ghi ra màn hình a/. KQ la a b/. Ket qua la a c/. KQ la <giá trị của a> d/. Khơng đưa ra gì cả Câu 2: Trong Ngơn ngữ lập trình PasCal, câu lệnh nào sau đây là đúng? a/. If a = 10 Then a := a + 1; b := a – c Else a := a + 2; b/. If a = 10 Then Begin a := a + 1; b := a – c; End Else a := a + 2; c/. If a = 10 Then Begin a := a + 1; b := a – c; End; Else a := a + 2; d/. If a = 10 Then Begin a := a + 1 b := a – c; End Else a := a + 2. Câu 3: Trong Ngơn ngữ lập trình PasCal, ta có câu lệnh lặp For I := 1 To 50 Write(i:4); Nếu muốn sử dụng vòng lặp While – Do thực hiện cơng việc tương tự như vậy thì ta phải viết câu lệnh While – Do như thế nào? a/. I := 1; Whlie I < = 50 Do Begin Write(i:4); I := I +1; End; b/. I := 0; Whlie I < 50 Do Begin I := I +1; Write(i:4); End; c/. I := 50; Whlie I > 1 Do Begin I := I -1; Write(i:4); End; d/. Cả 3 cách đều đúng. Câu 4: Trong Ngơn ngữ lập trình PasCal, hãy cho biết giá trị của M sau khi thực hiện đoạn chương trình sau: với a, b được nhập từ bàn phím (giả sử a = 10 và b = 12)? M := a; If a < b Then M := b; a/. M = 10. b/. M = 12; c/. M nhận cả 2 giá trị trên d/. Khơng nhận giá trị nào Câu 5: Trong Ngơn ngữ lập trình PasCal, hãy cho biết đoạn chương trình sau làm việc gì? I := 0; T := 0; While I < 100 Do Begin T := T + I; I := I +2; End; a/. Tính tổng các số tự nhiên nhỏ hơn hoặc bằng 100. b/. Tính tổng các số tự nhiên nhỏ hơn 100. c/. Tính tổng các số tự nhiên chẵn nhỏ hơn 100. d/. Tính tổng các số tự nhiên chẵn nhỏhơn hoặc bằng 100 Câu 6: Phát biểu nào sau đây là đúng? a/. Khi cần thay đổi 1 từ khóa nào đó người lập trình cần khai báo theo ý nghĩa mới . b/. Mọi đối tượng khi có giá trị thay đổi trong chương trình gọi là biến. c/. Trong chương trình tên gọi cũng là 1 đối tượng khơng thay đổi nên cũng có thể xem là hằng. d/. Tất cả đều đúng. Câu 7: Trong Ngơn ngữ lập trình PasCal, để đổi giá trị của 2 giá trị cho nhau, ta viết mã lệnh sau: a/. Tg := a; b := a; a := Tg; b/. a := Tg; a := b; b := Tg; c/. Tg := a; a := b; b := Tg; d/. Tg := a; a := b; Tg := b; Câu 8:Trong Ngôn ngữ lập trình PasCal, câu lệnh nào sau đây là đúng? a/. If <Biểu thức logic>; Then <Câu lệnh> b/. If <Biểu thức logic>; Then <Câu lệnh>; c/. If <Biểu thức logic> Then <Câu lệnh> d/. If <Biểu thức logic> Then <Câu lệnh>; Bài Tập (4 điểm): Viết CT nhập vào 1 dãy số nguyên vào từ BP cho đến khi gặp số 0. Tính tổng các số âm và TBC số dương. ----------------------------------------------- HẾT ----------------------------------------------- ĐÁP ÁN 1. A, 2. B , 3. D, 4. B, 5. C, 6. B, 7. C, 8. D, Bài Tập: i=1, Sa=0, Sd=0, d=0; While (a<> 0) Do Writeln(‘nhập số thứ ’,I,’=’);Readln(a); If A < 0 then Sa := Sa + a Eles If A < 0 Then Sd:=Sd+1; d:= d+A; I:= i+1 . Write (i: 4); I := I +1; End; b/. I := 0; Whlie I < 50 Do Begin I := I +1; Write (i: 4); End; c/. I := 50; Whlie I > 1 Do Begin I := I -1; Write (i: 4); End;. While – Do thực hiện cơng việc tương tự như vậy thì ta ph i viết câu lệnh While – Do như thế nào? a/. I := 1; Whlie I < = 50 Do Begin Write (i: 4); I