Trắc nghiệm: Câu 1: Cách viết câu lệnh lặp với số lần biết trước như sau: a.. Câu 2: Số vòng lặp trong câu lệnh lặp với số lần biết trước for…do bằng?[r]
(1)KIỂM TRA TIẾT I Trắc nghiệm: Câu 1: Cách viết câu lệnh lặp với số lần biết trước sau: a For <biến đếm> = <giá trị đầu> to <giá trị cuối> <câu lệnh>; b For <biến đếm>: = <gía trị cuối> to <giá trị đầu> <câu lệnh> c For <biến đếm> := <giá trị đầu> to <giá trị cuối> <câu lệnh>; d For <biến đếm> = <giá trị đầu> to <giá trị cuối> <câu lệnh> Hãy chọn phương án đúng Câu 2: Số vòng lặp câu lệnh lặp với số lần biết trước (for…do) bằng? a <giá trị cuối> - <giá trị đầu> b Tùy thuộc vào bài tóan biết số lần c Khoảng 10 lần d <giá trị cuối> - <giá trị đầu> + Câu 3: Tìm giá trị S đọan chương trình đây: S := 0; For i := to S := S + I; a S = b S = c S = d S = 15 Câu 4: Khi nào thì câu lệnh For…to…do kết thúc? a Khi biến đếm lớn giá trị cuối b Khi biến đếm nhỏ giá trị cuối c Khi biến đếm giá trị cuối d Khi biến đếm lớn giá trị đầu câu 5: Để thực câu lệnh for i:=1 to 100 Tich:=Tich*i; cách khai báo nào sau đây là đúng a Var i: integer; Tich:real; b Var i: integer; Tich: longint; c Var i, Tich: integer; d Cả a, b đúng Câu 6: Số lần lặp đoạn chương trình sau bằng: h := 100; For i := to 95 h := h – 1; a 100 b 99 c 95 d 93 1 1 2* n 1 với n Câu 7: Câu lệnh lặp nào có thể tính tổng S = + nhập từ bàn phím ; ∗ n+1 b For i:= to n S:= S + 1/(2*i+1); a For i:= to n S:= S + (2) c i:=1; S:= 0; While i<=n Begin S:= S + 1/(2*i+1); i:= i + 1; end; d c và d đúng Câu 8:Cú pháp câu lệnh lặp với số lần chưa xác định là: a While <câu lệnh> <điều kiên>; b While <điều kiện> to <câu lệnh>; c While <điều kiện> <câu lệnh>; d While <câu lệnh> to <điều kiện>; Câu 9:Trong đoạn lệnh sau: X:= 10; Y:= 1; While x <=15 y:= y + 1; Chọn câu đúng các câu sau: a Số lần lặp là 10; b Số vòng lặp là vô tận c Số lần lặp là 15; d Tất sai Câu 10: Cho đoạn chương trinh sau: I:=0; While i<5 Begin I:= I + 1; Tong:= tong + I; End; Em hãy cho biết tổng có giá trị bao nhiêu? a b c 10 d 15 Câu 11: Điều kiện vòng lặp chưa xác định thoát khỏi vòng lăp là: a Điều kiện đúng b Điều kiện sai c Số lần lặp phụ thuộc vào điều kiện và thoát khỏi vòng lặp điều kiện không còn đúng d Số lần lặp phụ thuộc vào điều kiện và thoát khỏi vòng lặp điều kiện còn đúng câu 12: Hai câu lệnh nào in chữ A màn hình? a gotoxy(wherex, wherey); write(A); b gotoxy(wherex, wherey); write(‘A’); c gotoxy(80, 48); write(‘A’); d gotoxy(40, 24); write(‘A’); TỰ LUẬN BÀI 1: Chương trình tính tổng S = -1 + – + – + + (-1)nn Câu 1) Tìm lỗi sai và sửa đúng chương trình sau: (3) Program tinhtong; Var s, n, i: integer; Uese crt; Begin Clrscr; Write(‘nhap n: ’); realn(n); S:= 0; i:= 1; While i<= n Begin If i mod <> then S:= S + i Else S:= S – i; i:= i + End; Write(‘Tong S = ’,S); Readln End Câu 2) Viết lại chương trình cách sử dụng câu lệnh For thay cho câu lệnh While do? (4)