Câu 1: Trong câu lệnh lặp : For i : = 1 to 10 do begin … end ; câu  lệnh ghép được thực hiện bao nhiêu lần ? (nói cách khác, bao nhiêu vòng lặp được thực hiện ?)           A. 2 lần.                        B. Không lần nào.        C.  10 lần.                     D. 1 lần. Câu 2: Để tính tổng  S= 2 +4 +6 … + n; em chọn đoạn lệnh S:=0 và :           A. for i:=1 to n do S:=S + i;           B. for i:=1 to n do  if ( i mod 2)<>0 then S:=S + i;           C. for i:=1 to n do if ( i mod 2)=0 then S:=S + i;           D. for i:=1 to n do  if ( i mod 2)=1 then S:=S + i; Câu 3: Sau khi thực hiện đoạn chương trình j:= 1; for i:= 1 to 3 do j:=j+2; thì giá trị j in ra màn hình là?           A. 7                                B. 8                                C. 6                                D. 10 Câu 4: Điều kiện trong câu lệnh lặp với số lần chưa biết trước thường là :           A. Phép gán                    B. Phép tính                    C. Phép toán vd :+,-*,/,..        D.  Phép so sánh Câu 5: Cho đoạn chương trình sau đây : X : = 7 ; k : = 0 ; While k < = 5 do Begin    Writeln(k);   k : = k + 1; End; X : = k; Sau khi đoạn chương trình trên được thực hiện, giá trị của x bằng bao nhiêu ?           A. 0.                              B. 6                               C. 7                                D. 5. Câu 6: Cú pháp của câu lệnh lặp với số lần biết trước trong Pascal là:           A. For <biến đếm>:=<gía trị đầu> to <giá trị cuối>; do <câu lệnh>;           B.  For <biến đếm>: = <gía trị đầu> to <giá trị cuối> do <câu lệnh>;           C. For <biến đếm>:=<gía trị cuối> to <giá trị đầu> do <câu lệnh>;           D. For <biến đếm>:=<gía trị đầu> to <biến đếm>:= <giá trị cuối> do <câu lệnh>; Câu 7: Vòng lặp while ..do là vòng lặp:           A. Biết trước số lần lặp nhưng giới hạn là <=100              B. Biết trước số lần lặp           C. Biết trước số lần lặp nhưng giới hạn là >=100              D. Chưa biết trước số lần lặp Câu 8: Cho S và i là biến nguyên. Khi chạy đoạn chương trình :     s:=1;     for i:=1 to 4 do s := s+i;     writeln(s);     Kết quả in lên màn hình là của s là :           A.  11                             B. 15                              C. 55                              D. 10 Câu 9: Cho câu lệnh: for i:= 4.5 to 15.5 do writeln(‘A’); Lỗi trong câu lệnh trên là:           A. Giá trị đầu lớn hơn gi trị cuối.(1)           B.  Giá trị đầu và gía  trị cuối là số thực(2)           C. Cả (1) & (2) đều đúng.           D. Giá trị đầu nhỏ hơn gi trị cuối.(3) Câu 10: Để tính tổng  S=1 + 2 +3 +4 … + n; Em chọn đoạn lệnh S:=0 và :           A. for i:=1 to n do if ( i mod 2)=0 then S:=S + i;           B.   for i:=1 to n do S:= S + i ;           C. for i:=1 to n do   if ( i mod 2)=3 then S:=S + i;           D. for i:=1 to n do    if ( i mod 2)<>0 then S:=S + i; Câu 11: Cho đoạn chương trình : X:=10; while X:=10 do X:= X+ 5; Lỗi trong trong đoạn chương trình trên là :           A. Dư dấu hai chấm trong câu lệnh X:=X+5           B. Thiếu begin và end trước và sau lệnh X:= X + 5;           C. Dư dấu hai chấm trong điều kiện X:=10           D. Dư dấu chấm phẩy sau câu lệnh X:= X + 5; Câu 12: Hãy cho biết đoạn chương trình sau thực hiện bao nhiêu vòng lặp?             S:=0;    n:=0;             while S<= 10 do n:= n+1;  S:=S + n;           A. Vòng lặp vô tận          B. Không lặp vòng nào   C. 10 vòng lặp                D. 5 vòng lặp Câu 13: Với ngôn ngữ lập trình Passcal câu lệnh lặp for i:=1 to 10 do x:=x+1; thì biến đếm i phải được khai báo là kiểu dữ liệu trong các kiểu dữ liệu bên dưới:           A. real;(2)                       B. string;(3)                    C. Interger;(1)                 D. Cả (1),(2) & (3) Câu 14: Để đếm xem có bao nhiêu số chẳn nhỏ hơn hay bằng n ; em chọn đoạn lệnh S:=0; và:           A. for i:=1 to n do if ( i mod 2)=0 then S:=S + i           B.  for i:=1 to n do if ( i mod 2) =0 then S:=S + 1;           C. for i:=1 to n do if ( i mod 2)< >0 then S:=S + 1;           D. for i:=1 to n do if ( i mod 2)=1 then S:=S + i;