Câu 17. Hãy cho biết chương trình dưới đây sẽ thực hiện bao nhiêu vòng lặp khi thực hiện đoạn chương trình n:=16;  T:=T  -n; end;

A.2   B.3   C.4  D.5

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

S:=10;  x:=0,5;

While >=6,2 do

S:=S-x;

Hãy cho biết giá trị của S sau đoạn chương trình trên:

A. 5                   B. 4                    C.6                       D.7

Câu 19. Sau khi thực hiện đoạn chương trình sau:

j:=0;    s:=1;

for i:=1 to 3 do

j:=j+1;

s:=j+1;

Gía trị của biến j, biến s bằng?

A. j=4, s=3           B.j:=3; s=4            C.j:=1; s=2              D.j:=2; s:=3

Câu 21. Gỉa sử có dòng lệnh :

for i:=0 to 9 do

a:=1+i;

Số lần lặp của lệnh gán a:=1+i là:

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

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

k=0

for k in range(10): k = k + 2

print(k)

Khi kết thúc đoạn chương trình trên, câu lệnh print(k) được thực hiện bao nhiêu lần?

    A.  1                     B.  Không thực hiện                 C.  10                    D.  5

Câu 1: 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

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

S:= 0;

for i:= 1 to 5 do S:= S + i;

A. 10                                  B. 12                              C. 20                              D. 15

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

i:=1; tong:=0;

While i <= 5 do

Begin

tong:= tong + i;

i:= i + 1;

End;

Sau đoạn chương trình trên em hãy cho biết biến “tong” có giá trị bằng bao nhiêu?

A.1                           B.5                                 C.10                               D.15

Câu 4: Trong Pascal, câu lệnh nào sau đây được viết đúng?

A. for i := 10 to 1 do writeln(‘A’);

B. for i := 1.5 to 5.5 do writeln(‘A’);

C. for i := 1 to 100 do writeln(‘A’);

D. for i := 1 to 10; do writeln(‘A’);

Câu 5: Trong câu lệnh lặp for n:= 1 to 10 do begin ... end;

Câu lệnh ghép được thực hiện bao nhiêu lần?

A. 10 lần;                 B. 5 lần;     C. Không lần nào;                   D. 1 lần.

Câu 6: Khi giải thích các thành phần trong câu lệnh lặp, phát biểu nào sau đây đúng?

A. For, to, do là các từ khóa, biến đếm là biến kiểu số nguyên hoặc số thực.

B. Giá trị đầu và giá trị cuối là các giá trị nguyên hoặc giá trị thực.

C. Câu lệnh lặp sẽ thực hiện câu lệnh nhiều lần, mỗi lần là một vòng lặp. Số lần lặp là biết trước và bằng giá trị cuối – giá trị đầu + 1.

D. Cả ba ý trên.

Câu 7: 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;                                        D. 7.

Câu 8: Trong câu lệnh khai báo biến mảng, phát biểu nào sau đây đúng:

A. Chỉ số đầu và chỉ số cuối là 2 số nguyên;

B. Chỉ số đầu nhỏ hơn chỉ số cuối;

C. Kiểu dữ liệu có thể là integer hoặc real;

D. Cả ba ý trên;

Câu 9: Giả sử biến mảng A có 5 phần tử và giá trị của các phần tử lần lượt là 1, 4, 7, 2, 6. Khi thực hiện câu lệnh sau:

tb:= 0;

For i:= 1 to 5 do tb := tb + A[i];

Giá trị của biến tb là bao nhiêu?

A. 20;                                          B. 18;                   C. 21;                             D. 22;

Câu 10: Lệnh lặp nào sau đây là đúng?

A.   For <biến đếm>= <giá trị đầu>  to  <giá trị cuối> do <câu lệnh>;

B.   For <biến đếm>:= <giá trị đầu>  to <giá trị cuối > do <câu lệnh>;

C.   For <biến đếm>:= <giá trị cuối>  to <giá trị đầu> do <câu lệnh>;

D.   For <biến đếm>: <giá trị đầu>   to <câu lệnh> do <giá trị cuối>;

Câu 11: Lệnh  lặp while ..do  số vòng lặp là:

A. Biết trước số lần lặp                              B. Chưa biết trước số lần lặp

            C. Không thực hiện vòng lặp nào                           D. Lặp vô hạn lần

Câu 12: Câu lệnh lặp while…do có dạng đúng là:

A. While <điều kiện> do <câu lệnh>;            B. While <điều kiện> <câu lệnh> do;

C. While <câu lệnh> do <điều kiện>;     D. While <điều kiện>, do  <câu lệnh>;

Câu 13: Cho S và i là biến nguyên. Khi chạy đoạn chương trình:

    s:=0;       for i:=1 to 5 do s:= s+i;

    writeln(s);

    Kết quả in lên màn hình là của s là:

     A.11                     B. 55                              C. 15                    D.105

Câu 14: Chương trình pascal sau sẽ in ra màn hình nội dung gì?

Var i: integer;

Begin 

For i:=1 to 10 do writeln(‘Day la lan lap thu’ ,i);

                                   Readln; 

                                   End.

A. 1 câu “Day la lan lap thu i ”        

B. 1 câu “Day la lan lap thu’, i ”

C. 10 câu “Day la lan lap thu’ , i ”   

D. 10 câu "Day la lan lap  thu   i ”  theo thứ tự   của  i là   từ  1à10

Câu 15 Cho S và i biến kiểu nguyên. Khi chạy đoạn chương trình:

    S:= 0;  i:= 1;

    while i <5  do      begin       S:= S + i;   i:= i + 1;      end;

          Giá trị sau cùng của S là:

          A. 16                    B. 9                      C. 6                      D.0 ai lm đc xứng đáng 10 ny hí hí

Câu 20: Cho đoạn chương trình:           j:= 0;

                                                            For i:= 1 to 5 do j:= j + i;

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

A. 12                     B. 15                                                     C. 22                     D. 42.

Câu 20: Đoạn chương trình sau giải bài toán nào?

      For I:=1 to M do

          If (I mod 3 = 0) and (I mod 5 = 0) then

             T := T + I;

   A. Tổng các số chia hết cho 3 hoặc 5 trong phạm vi từ 1 đến M

   B. Tổng các số chia hết cho 3 và 5 trong phạm vi từ 1 đến M

C. Tổng các số chia hết cho 3 trong phạm vi từ 1 đến M

 D. Tổng các số chia hết cho 5 trong phạm vi từ 1 đến M

Câu 21: Sau khi thực hiện đoạn chương trình sau:

   S:=10;

   For i:=1 to 4 do S:=S+i;

   Giá trị của biến S bằng bao nhiêu?

   A. 20

   B. 14

   C. 10

   D. 0

Câu 22: Cho các câu lệnh sau hãy chỉ ra câu lệnh đúng :

   A. for i:=1 to 10; do x:=x+1;

   B. for i:=1 to 10 do x:=x+1;

   C. for i:=10 to 1 do x:=x+1;

   D. for i =10 to 1 do x:=x+1;

Câu 23: 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 nào?

   A. Integer

   B. Real

   C. String

   D. Tất cả các kiểu trên đều được

Câu 24: Xác định số vòng lặp cho bài toán: tính tổng các số nguyên từ 1 đến 240

   A. 1

   B. 240

   C. 241

   D. Tất cả đều sai

Câu 25: Tính tống S = 1 + 2 + 3 + … + n + … cho đến khi S>10⁸. Điều kiện nào sau đây cho vòng lặp while – do là đúng:

   A. While S>=10⁸ do

   B. While S < 10⁸ do

   C. While S < 1.0E8 do

   D. While S >= E8 do
 

Câu 26: Hãy đưa ra kết quả trong đoạn lệnh:

   x:=1; While x<=5 do write(‘Hoa hau’);

   A. x:=1

   B. X>=5

   C. Hoa hau

   D. Không có kết quả.

Câu 27: Câu lệnh sau giải bài toán nào:

   While M <> N do

   If M > N then M:=M-N else N:=N-M;

   A. Tìm UCLN của M và N

   B. Tìm BCNN của M và N

   C. Tìm hiệu nhỏ nhất của M và N

   D. Tìm hiệu lớn nhất của M và N

Câu 28: Hãy cho biết kết quả của đoạn chương trình dưới đây:

a:=10; While a < 11 do write (a);

   A. Trên màn hình xuất hiện một số 10

   B. Trên màn hình xuất hiện 10 chữ a

   C. Trên màn hình xuất hiện một số 11

   D. Chương trình bị lặp vô tận

Câu 29: Cho biết câu lệnh sau Do thực hiện mấy lần trong đoạn chương trình sau:

   i := 5;

   While i>=1 do i := i – 1;

   A. 1 lần

   B. 2 lần

   C. 5 lần

   D. 6 lần

Câu 30: Việc đầu tiên mà câu lệnh While ... do cần thực hiện là gì?

   A. Thực hiện < câu lệnh > sau từ khóa Do

   B. Kiểm tra giá trị của < điều kiện >

   C. Thực hiện câu lệnh sau từ khóa Then

   D. Kiểm tra < câu lệnh >
quẹc quẹc, hép mi, ét o ét ;-;
ai làm đc hết xứng đáng nuôi tui ;-;

Câu 1: Cho đoạn chương trình:

S:=0;

For i:=1 to 5 do S:=S+2;

      Sau khi thực hiện đoạn chương trình trên S có kết quả là :

                        A. 20                           B. 15                                       C. 10                           D. 0

Câu 2: Từ khóa trong câu lệnh lặp với số lần đã biết trước là:

A. While, do                       B. For, to, do                            C. For, do                    D. Four, to, do

Câu 3: Trong câu lệnh lặp với số lần đã biết trước, sau mỗi vòng lặp, biến đếm được tự động tăng thêm ...... cho đến khi bằng giá trị cuối. Chỗ trống cần điền là:

A. 1 đơn vị                            B. 6 đơn vị                              C. 4 đơn vị                  D. 2 đơn vị

Câu 4: Với S là biến Tổng và có giá trị ban đầu là 0. Hãy viết câu lệnh lặp với số lần biết trước tính tổng các số tự nhiên từ 2 đến 10.

A. For i:=1 to 10 do S:=S+i;                                                  B. For i:=2 to 10 do S:=S+i;

C. For i:=1 to 10 do S:=S+2*i;                                              D. For i:=2 to 10 do S:=S+2*i;

Câu 5: Với S là biến Tổng và có giá trị ban đầu là 0. Hãy viết câu lệnh lặp với số lần biết trước tính tổng các số chẵn từ 2 đến 10.

A. For i:=1 to 5 do S:=S+i;                                                    B. For i:=2 to 10 do S:=S+i;

C. For i:=1 to 5 do S:=S+2*i;                                                D. For i:=2 to 10 do S:=S+2*i;

Câu 6: Với S là biến Tổng và có giá trị ban đầu là 0. Hãy viết câu lệnh lặp với số lần biết trước tính tổng các số lẻ từ 1 đến 10.

A. For i:=1 to 5 do S:=S+2*i-1;                                            B. For i:=1 to 9 do S:=S+i;

C. For i:=1 to 5 do S:=S+2*i+1;                                            D. For i:=1 to 9 do S:=S+2*i;

Câu 7: Với S là biến Tích và có giá trị ban đầu là 1. Hãy viết câu lệnh lặp với số lần biết trước tính tích các số tự nhiên từ 1 đến 5.

A. For i:=1 to 5 do S:=S+i;                                                      B. For i:=0 to 4 do S:=S*(i+1);

C. For i:=1 to 5 do S:=S*i;                                                      D. B và C đều đúng;

Câu 8: Với S là biến Tích và có giá trị ban đầu là 1. Hãy viết câu lệnh lặp với số lần biết trước tính tích các số chia hết cho 4 từ 1 đến 20.

A. For i:=1 to 5 do S:=S+4*i;                                                  B. For i:=4 to 20 do S:=S+4*i;

C. For i:=1 to 5 do S:=S*4*i;                                      D. B và C đều đúng;

Câu 9: Với S là biến Tích và có giá trị ban đầu là 1. Hãy viết câu lệnh lặp với số lần biết trước tính tích các số chia hết cho 3 từ 1 đến 9.

A. For i:=1 to 3 do S:=S*i;                                                      B. For i:=0 to 2 do S:=S*(i+3);

C. For i:=1 to 3 do S:=S*3*i;                                      D. B và C đều đúng;

Câu 10: Câu lệnh for i=10 to 1 do writeln(’A’); có bao nhiêu lỗi?

A. 1                                          B. 2                                         C. 3                             D. 4

Câu 11: Câu lệnh for i=2.2 to 18.2 do writeln (’A’); có bao nhiêu lỗi?

A. 1                                          B. 2                                         C. 3                             D. 4

Câu 12: Câu lệnh for i=1 to 5 do writeln(’Tin hoc’); được sửa lỗi như thế nào?

A. for i:=1 to 5 do writeln(’Tin hoc’);                         B. for i=:1 to 5 do writeln(’ Tin hoc’);

C. for i:=5 to 1 do; writeln(’ Tin hoc’);                                   D. for i:=1 to 5 do writeln(’ Tin hoc’)

Câu 13: Câu lệnh for i:=0 to 9 do writeln(’A’); có bao nhiêu vòng lặp?

A. 7                                          B. 8                                         C. 9                             D. 10

Câu 14: Cho đoạn chương trình:

S:=0;

For i:=1 to 5 do S:=S+2;

Sau khi thực hiện đoạn chương trình trên i có kết quả là :

A. 2                             B. 3                                         C. 4                             D. 5

Câu 15:  Đoạn chương trình sau: var x: real; Begin for x:=2 to 8 do writeln(’A’); End.

được sửa lỗi như thế nào?

A. var x: interger; Begin for x:=2 to 8 do writeln(’A’); End.

B. var x: integer; Begin for x:=2 to 8 do writeln(’A’); End.

C. var x: real; Begin for x:=2 to 8 do writeln(’A’)  End.

D. var x: real; Begin for x=2 to 8 do writeln(’A’); End.

Câu 16: Hãy cho biết giá trị của S trong đoạn lệnh sau:

                            S:=0; for i:=1 to 3 do S:=S+2*i;

A. 0                                          B. 4                                         C. 3                             D. 12

Câu 17: Hãy cho biết giá trị của S trong đoạn lệnh sau:

                            S:=0; for i:=2 to 6 do S:=S*2*i;

A. 0                                          B. 8                                         C.                                D. 40

Câu 18: Trong Pascal, câu lệnh lặp với số lần đã biết trước có dạng:

A. for <biến đếm> = <giá trị cuối> to <giá trị đầu> do <câu lệnh>;

B. for <biến đếm> := <giá trị đầu> to <giá trị cuối> do <câu lệnh>;

C. for <biến đếm> := <giá trị đầu> to <giá trị cuối> do <câu lệnh>

D. for <biến đếm> := <giá trị cuối> to <giá trị đầu> do <câu lệnh>;

Câu 19: Số vòng lặp trong câu lệnh lặp với số lần đã biết trước là:

A. Giá trị đầu + giá trị cuối + 1                                               B. Giá trị cuối - giá trị đầu + 1

C. Giá trị đầu - giá trị cuối + 1                                                            D. Giá trị cuối - giá trị đầu

Câu 20: Trong câu lệnh lặp với số lần đã biết trước, khi thực hiện lệnh, ban đầu biến đếm sẽ nhận giá trị bằng:

A. Giá trị đầu                           B. Giá trị cuối                         C. 0                             D. 1

Câu 21: Trong câu lệnh lặp với số lần đã biết trước, giá trị đầu và giá trị cuối là:

A. Các giá trị tự nhiên             B. Các giá trị nguyên  C. Các giá trị thực       D. A, B, C đúng

Câu 22: Hãy cho biết ý nghĩa câu lệnh for … do  trong đoạn lệnh sau:

                            S:=0; for i:=1 to 10 do S:=S+3*i;  

Tổng các số chia hết cho 3 từ 1-30 (hoặc từ 3-30)

Câu 23: Hãy cho biết ý nghĩa câu lệnh for … do trong đoạn lệnh sau:

                            S:=1; for i:=0 to 3 do S:=S*(i+1); 

Tích  các số tự nhiên từ 1 đến 4

Câu 24: Kiểu dữ liệu của biến đếm trong lệnh lặp For – do:

   A. Cùng kiểu với giá trị đầu và giá trị cuối

   B. Chỉ cần khác kiểu với giá trị đầu

   C. Cùng kiểu với các biến trong câu lệnh

   D. Không cần phải xác định kiểu dữ liệu

Câu 25: Hoạt động nào sau đây lặp với số lần lặp biết trước?

   A. Giặt tới khi sạch

   B. Học bài cho tới khi thuộc bài

   C. Gọi điện tới khi có người nghe máy

   D. Ngày đánh răng 2 lần

Câu 26: Câu lệnh For..to..do kết thúc :

   A. Khi biến đếm nhỏ hơn giá trị cuối

   B. Khi biến đếm lớn hơn giá trị cuối

   C. Khi biến đếm nhỏ hơn giá trị đầu

   D. Khi biến đếm lớn hơn giá trị đầu

Câu 27: Cho các câu lệnh sau hãy chỉ ra câu lệnh đúng:

   A. for i:=1 to 10; do x:=x+1;

   B. for i:=1 to 10 do x:=x+1;

   C. for i:=10 to 1 do x:=x+1;

   D. for i =10 to 1 do x:=x+1;

Câu 28: 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 nào?

   A. Integer

   B. Real

   C. String

   D. Tất cả các kiểu trên đều được

Câu 29: Đoạn chương trình sau giải bài toán nào?

      For I:=1 to M do

          If (I mod 3 = 0) and (I mod 5 = 0) then

             T := T + I;

   A. Tổng các số chia hết cho 3 hoặc 5 trong phạm vi từ 1 đến M

   B. Tổng các số chia hết cho 3 và 5 trong phạm vi từ 1 đến M

C. Tổng các số chia hết cho 3 trong phạm vi từ 1 đến M

D. Tổng các số chia hết cho 5 trong phạm vi từ 1 đến M

Câu 30: Xác định số vòng lặp cho bài toán: tính tổng các số nguyên từ 1 đến 100

   A. 1

   B. 100

   C. 99

   D. Tất cả đều sai

Câu 31: Sau khi thực hiện đoạn chương trình sau:

   S:=10;

   For i:=1 to 4 do S:=S+i;

   Giá trị của biến S bằng bao nhiêu?

   A. 20

   B. 14

   C. 10

   D. 0

Câu 32: Xác định số vòng lặp cho bài toán: tính tổng các số lẻ từ 1 đến 99

   A. 49

   B. 50

   C. 98

   D. 99

Câu 33: Cho đoạn chương trình:

S:=0;

For i:=1 to 5 do S:=S+2;

Câu lệnh lặp trên lặp bao nhiêu lần?

A. 4                             B. 5                                         C. 6                             D. Chỉ 1 lần.

‚ CÂU LỆNH LẶP WHILE … DO

   - Trong Pascal câu lệnh lặp với số lần chưa biết trước có dạng:

while <điều kiện> do <câu lệnh>;

   - Trong đó: Điều kiện thường là 1 phép so sánh; câu lệnh có thể là câu lệnh đơn hay câu lệnh ghép (câu lệnh ghép phải đặt trong begin ….end;)

   - Câu lệnh lặp được thực hiện như sau (2 bước)

            Bước 1: Kiểm tra điều kiện

            Bước 2:  Nếu điều kiện sai, câu lệnh sẽ bỏ qua kết thúc vòng lặp. Nếu điều kiện đúng câu lệnh sẽ được thực hiện và quay lại bước 1

Câu 34: Trong Pascal, câu lệnh lặp với số lần chưa biết trước có dạng:

A. while <điều kiện> do <câu lệnh>                           B. while <câu lệnh> do <điều kiện>;

C. while <điều kiện> do <câu lệnh>;              D. while := <điều kiện> do <câu lệnh>;

Câu 35: Cho đoạn chương trình:

S: =0 ;  n:= 0;

While S < = 6 do 

 begin

      n:= n+1;

      S:= S+ n ;

  End;

25.1/ Sau khi thực hiện đoạn chương trình trên S có kết quả là

A. 6                             B. 10                                       C. 15                           D. 21

25.2/  Sau khi thực hiện đoạn chương trình trên n có kết quả là

A. 2                             B. 3                                         C. 4                             D. 5

25.3/ Câu lệnh lặp trên là câu lệnh lặp gì?

A. Biết trước               B. Chưa biết trước                  C. Điều kiện                D. Tất cả đều sai.

      25.4/ Câu lệnh trong câu lệnh lặp While ... do  là câu lệnh .................

A. Đơn                        B. Ghép                                   C. A, B đúng               D. Tất cả đều sai.

Câu 36: Đoạn lệnh sau so:=2; While so < 5 do writeln(so);  cho kết quả gì?

A. In ra kết quả từ 2 đến 4                                                      B. In ra các số từ 2 đến 5

C. In ra số 2                                                                            D. In ra vô hạn số 2

Câu 37: Câu lệnh lặp với số lần chưa biết trước được thực hiện bao nhiêu bước?

A. 1                                          B. 2                                         C. 3                             D. 4

Câu 38: Bước đầu tiên khi thực hiện câu lệnh lặp với số lần chưa biết trước là:

A. Kiểm tra điều kiện                                                              B. Thực hiện câu lệnh  

C. Kiểm tra biến                                                                      D. Kiểm tra câu lệnh

Câu 39: Để thực hiện chương trình tính tổng S = 1 + 2 + 3 + 4 ... + 100 ta có thể sử dụng câu lệnh lặp nào?

A. For ... do                             B. While ... do                        C. Cả A, B sai             D. Cả A, B đúng

Câu 40: Đoạn lệnh S:=0; n:=0; while S<=10 do begin n:=n+1; S:=S+n end; có bao nhiêu vòng lặp?

A. Vô tận                                 B. 3                                         C. 5                             D. 6

Câu 41: Đoạn lệnh n:=0; while n<=10 do begin n:=n+1; end; có bao nhiêu vòng lặp?

A. 0                                          B. 10                                       C. 11                           D. Vô tận

Câu 42: Đoạn lệnh S:=0; n:=1; while i<=5 do begin S:=S+i; n:=n+1; end; giá trị S sau khi kết thúc câu lệnh lặp là?

A. 1                                          B. 5                                         C. 8                             D. 15

Câu 43: Đoạn lệnh X:=10; while X:=10 do X:=X+5; có bao nhiêu lỗi?

A. 1                                          B. 2                                         C. 3                             D. 4

Câu 44: Đoạn lệnh X:=10; while X:=10 do X:=X+5; được sửa lỗi như thế nào?

A. X:=10 while X:=10 do X:=X+5;                            B. X:=10; while X=10 do X:=X+5

C. X:=10; while X=10 do X:=X+5;                            D. X:=10 while X=10 do X=X+5

Câu 45:  Câu lệnh Pascal : While (2*5>=10) do Writeln (2*5); sẽ :

A. In số 10 ra màn hình 3 lần.                                      B. In số 10 ra màn hình 5 lần.

C. Không thực hiện lệnh Writeln (2*5);                       D. Lặp vô hạn lần lệnh Writeln (2*5);

Câu 46:  Đoạn lệnh S:=0; n:=0; while S<=10 do begin n:=n+1; S:=S+n; có bao nhiêu lỗi?

A. 1                                         B. 4                                         C. 5                             D. 6

Câu 47:  Đoạn lệnh S:=0; n:=0; while S<=10 do begin n:=n+1; S:=S+n; được sửa lỗi:

A. S:=0; n:=0; while S<=10 do n:=n+1; S:=S+n end;

B. S:=0; n:=0; while S<=10 do begin n:=n+1; S:=S+n; end.

C. S:=0; n:=0; while S<=10 do n:=n+1; S:=S+n; end;

D. S:=0; n:=0; while S<=10 do begin n:=n+1; S:=S+n end;

Câu 48: Đoạn lệnh S:=10; x:=0.5; while S >5.2 do S:=S - x; writeln(S); có bao nhiêu vòng lặp?

A. Vô tận                                 B. 5                                         C. 6                             D. 10

Câu 49:  Đoạn lệnh X:=20 while X=10 do X=X+10; có bao nhiêu lỗi?

A. 1                                          B. 2                                         C. 3                             D. 4