Hãy cho biết đoạn chương trình sau làm công việc gì ?

I := 0 ; T := 0 ;

While I < 10000 do

            Begin

                        T := T + I ;

                        I := I + 2 ;

            End ;

Câu hỏi liên quan

• Cho hai dạng lặp FOR – DO trong PASCAL như sau :

  Dạng lặp tiến :

              FOR <biến đếm> := <giá trị đầu> TO <giá trị cuối> DO <câu lệnh> ;

  Dạng lặp lùi :

              FOR <biến đếm> := <giá trị cuối> DOWNTO <giá trị đầu> DO <câu lệnh> ;

  Chọn phát biểu đúng trong các phát biểu sau đây :

• Cú pháp lệnh lặp For – do dạng lùi:

• Đoạn chương trình sau cho kết quả trên màn hình là gì với i là biến số nguyên:

  For i := 1 to 100 do if i mod 9 = 0 then write(i, ‘ ’);

ZUNIA12

• Đ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;

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

• Trong câu lệnh While – do, điều kiện là: (Chọn phương án đúng nhất)

• Cấu trúc lặp với số lần chưa biết trước:

• Mọi quá trình tính toán đều có thể mô tả và thực hiện dựa trên cấu trúc cơ bản là:

• Chọn phát biểu sai trong các phát biểu sau đây:

• Có thể dùng câu lệnh While – do thay cho câu lệnh For – do được không?

• Cú pháp lệnh lặp For – do dạng tiến:

• Đoạn chương trình sau làm công việc gì? (Chọn phương án đúng nhất)

              While a <> 2*b   do               

  Begin    a:=a+1;     b:=b+1;      

  End;

• Trong vòng lặp While – do, câu lệnh được thực hiện khi:

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

• Trong vòng lặp For – do dạng tiến. Giá trị của biến đếm

• Để tổ chức việc lặp như vậy PASCAL dùng câu lệnh WHILE – DO có dạng :

                          WHILE <điều kiện> DO <câu lệnh>;

  Chọn phát biểu sai trong các phát biểu dưới đây :

• Chương trình sau giải bài toán gì:

  Var M, N, I : integer; BEGIN             clrscr;             M := 0 ;             N := 0 ;             For I := 1 TO 10000 do                 Begin                         if  (  (I mod 3) = 0 )  then M := M + 1 ;                         if  (  (I mod 3) = 0 ) and ( (I mod 5) = 0 ) then N := N + 1 ;                 End;             writeln( M,‘     ’, N );             readln END.

   

• Trong lệnh lặp For – do: (chọn phương án đúng nhất)

• Vòng lặp While – do kết thúc khi nào

• Đoạn chương trình sau làm công việc gì? (Chọn phương án đúng nhất)

              While a < (b+25)   do                     readln(a,b);