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

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

viết chương trình tính tổng các số chia hết cho 5 trong dãy N số tự nhiên đầu tiên

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