Pascal Bài 8

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

• Khi một điều kiện cho trước được thỏa mãn

• Khi đủ số vòng lặp

• Khi tìm được Output

• Tất cả các phương án

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

While not (1/(a+N) < 0.0001) do

Begin

N:=N+1;

S:=S+ 1.0/(a+N);

End;

• Tính tổng các số nhỏ hơn 0,0001

• Tính tổng các số lớn hơn 0,0001

• Tính tổng s=1/a+1/(a+1)+1/(a+2)+⋯+1/(a+N)+⋯ cho đến khi 1/(a+N)>0,0001

• Tính tổng s=1/a+1/(a+1)+1/(a+2)+⋯+1/(a+N)+⋯ cho đến khi 1/(a+N)<0,0001

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

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

• Đưa ra màn hình 10 chữ số 0

• Không đưa ra thông tin gì;

• Lặp vô hạn việc đưa ra màn hình số 0

• Đưa ra màn hình một chữ số 0

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 ;

• Tính tổng các số tự nhiên nhỏ hơn hoặc bằng 10000

• Tính tổng các số tự nhiên chẵn nhỏ hơn 10000

• Tính tổng các số tự nhiên chẵn nhỏ hơn hoặc bằng 10000

• Tính tổng các số tự nhiên nhỏ hơn hoặc 10000

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

• Lặp lại việc nhập a,b cho đến khi a < b+25

• Lặp lại việc nhập a,b cho đến khi a> b+25

• Lặp lại việc nhập a,b cho đến khi a ≥ b+ 25

• Lặp lại việc nhập a,b cho đến khi a ≤ b+25

Đ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 khi a ≠ 2b thì lặp lại việc tăng a, b, n lên 1 đơn vị

• Lặp lại việc tăng a, b lên 1 đơn vị cho đến khi a ≠ 2b

• Lặp lại việc tăng a, b lên 1 đơn vị cho đến khi a = 2b

• Lặp lại việc tăng a, b lên 1 đơn vị cho đến khi a > 2b

Cho chương trình sau:

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

• 3     13720.0

• 1     10000.0

• 2      5000.0

• 3     10000.0

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

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

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

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

• Kiểm tra < câu lệnh >

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;

• 1 lần

• 2 lần

• 5 lần

• 6 lần

Hãy cho biết sau khi chạy chương trình thì trên màn hình xuất hiện gì:

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

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

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

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

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