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à:

Câu hỏi liên quan

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

• 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

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;

• 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 câu lệnh While – do, điều kiện là: (Chọn phương án đúng nhất)

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

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

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

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

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

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

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

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

• Cho chương trình sau:

  

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

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

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

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

   

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

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