Câu 10: Đoạn lệnh sau đây sẽ cho kết quả gì?

              so:=1;

              While so < 10 do writeln(so);

              so:=so + 1;

     A. In ra vô hạn các số 1, mỗi số trên một dòng;      B. Không phương án nào đúng

          C. In ra các số từ 1 đến 9;                                      D. In ra các số từ 1 đến 10;

Câu 11: Câu lệnh nào sau đây lặp vô hạn lần

A. s:=5; i:=0;

   While i<=s do

          s:=s + 1;
C. s:=5; i:=1;

   While i<=s do

i:=i + 1;
 

B. s:=5; i:=1;

   While i> s do

        i:=i + 1;
D. s:=0; i:=0; n:=5;

   While i<=n do

        Begin                                             

If (i mod 2)=1  Then  S:=S + i;

Else i:=i+1;

      End;
 
 
 
Câu 12: Để tính tổng  S=1/2+1/4 + 1/6 + … +1/ n; em chọn đoạn lệnh:

A. for i:=1 to n do

      if ( i mod 2)=0 then S:=S + 1/i;
C. 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/i
          Else S:= S + 1/i;
D. for i:=1 to n do

          if ( i mod 2)=0 then S:=S +1/ i

          Else S:=S-1/i;

 
Câu 13:Cách khai báo biến mảng trong pascal sau đây câu nào đúng?

           a.Var X:Array[10,13] of integer;

           b.Var X:Array[5..10.5] of  integer;

           c. Var X:Array[4..10] of integer;

Câu 14:Các câu lệnh pascal sau đây câu nào đúng?

          a. If x:=7 then a:=b;

          b.If x>5; then a:=b;

          c. If  x>5 then; a:=b;

          d. If x>5 then a:=b; else m:=n;

Câu 15: Cho đoạn chương trình Pascal sau đây:

          tong:= 0;

          While tong < 10 do

           tong:=tong+1;

         Sau khi đoạn chương trình trên được thực hiện, giá trị của tổng bằng bao nhiêu:

         A. 9     B. 10     C. 11     D. 12