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

Câu hỏi liên quan

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

• Để 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 :

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

ZUNIA12

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

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

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

• Đ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, ‘ ’);

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

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

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

• Cho chương trình sau:

  

  Màn hình cho kết quả gì khi nhập a = 5000 và b = 10000.

• Đoạn chương trình sau thực hiện công việc gì ?

  i := 0 ;            while i <> 0 do write(i, ‘ ’) ;

• Lệnh lặp For – do được sử dụng khi: (chọn phương án đúng nhất)

• 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

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

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

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

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

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

• 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.