Sau khi thực hiện đoạn chương trình Pascal :

X:=3

For i : = 1 to 3 do

x : = x - 1

X sẽ nhận được giá trị nào dưới đây ?

A. – 1;

B. 1 ;

C. -4 ;

Trong câu lệnh lặp:

For i := 1 to 10 do j:= j + 2; write( j );

Khi kết thúc câu lệnh lặp trên, câu lệnh write( j ); được thực hiện bao nhiêu lần?

A. 10 lần

B. 1 lần

C. 5 lần

Trong câu lệnh WHILE…DO, điều kiện sau từ khoá “WHILE” thường là:

A. Một phép gán

B. Biểu thức số học

C. Một phép so sánh

Viết chương trình sử dụng biến mảng để nhập từ bàn phím các phần tử của một dãy số nguyên. Độ dài của dãy cũng được nhập từ bàn phím.

Hãy đọc đoạn chương trình sau:

s:=0;

for i:= 1 to 5 do s:= s * i;

Sau khi thực hiện xong, kết quả s bằng:

A. 15

B. 0

C. Kết quả khác

Sau khi thực hiện đoạn chương trình sau, giá trị của biến k bằng bao nhiêu?

k: = 0;

For i:= 1 to 3 do k:= k + 3;

A. 9

B. 8

C. 5

D. 2

Gía trị đầu và giá trị cuối của câu lệnh lặp For...do có kiểu dữ liệu?

Khai báo biến mảng: A : array[1..7] of real ; . Sử dụng câu lệnh For i := 1 to 5 do readln(A[i]); để gán giá trị cho các phần tử trong biến A từ bàn phím, ta sẽ nhập được bao nhiêu giá trị?

A. 4

B. 5

C. 6

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