Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
a) Vòng lặp while thực hiện 5 vòng lặp:
Vòng thứ nhất s=0 => n=1, s=1;
Vòng thứ hai s=1 => n=2, s=3;
Vòng thứ ba s=3 => n=3, s=6;
Vòng thứ tư s=6 => n=4, s=10;
Vòng thứ năm s=10 => n=5, s=15 kết thúc vòng lặp.
=> Vòng while sẽ kết thúc khi giá trị của s thay đổi không đáp ứng điều kiện tiếp tục vòng.
b) Vòng lặp while thực hiện vô hạn lần.
=> Giá trị của s luôn thỏa mãn điều kiện tiếp tục vòng while vì trong vòng while không thấy sự thay đổi của biến s (s luôn bằng 0 bé hơn 10).
S:=0; i:=0;
While i<5 do
begin
S:=S+i;
i:=i+1;
end;
A. 15 B. 10 C.0 D. Không xác định
Giải thích:
Mô tả lặp trong vòng lặp while..do :
-Vòng 1: i ban đầu bằng 0. Kiểm tra điều kiện i<5 ---> ĐK đúng thực hiện câu lệnh s=s+i <=> s=0+0=0 ; i=i+1 <=> i=0+1=1.
Vòng 2: i=1 , kiểm tra điều kiện i<5 ---> ĐK đúng thực hiện câu lệnh : s=s+i <=> s=0+1=1; i=i+1 <=> i=1+1=2.
Vòng 3: i=2, kiểm tra điều kiện i<5 ---> ĐK đúng thực hiện câu lệnh : s=s+i <=> s=1+2=3; i=i+1 <=> i=2+1=3.
Vòng 4: i=3, kiểm tra điều kiện i<5 ---> ĐK đúng thực hiện câu lệnh : s=s+i <=> s=3+3=6; i=i+1 <=> i=3+1=4.
Vòng 5: i=4, kiểm tra điều kiện i<5 ---> ĐK đúng thực hiện câu lệnh : s=s+i <=> s=6+4=10; i=i+1 <=> i=4+1=5.
i=5, kiểm tra điều kiện i<5 ---> ĐK sai ---> kết thúc
Vậy giá trị s sau khi thực hiện đoạn chương trình đó là : 10
B1: Trong các hoạt động sau đây hoạt động nào là hoạt động lặp với số lần chưa biết trước:
A. tính tổng các số tự nhiên từ 1 đến 20.
B. Nhập các số nguyên cho đến khi đủ 50 số
C. Mỗi ngày tập TD 2 lần
D. Nhập dữ liệu từ bàn phím cho đến khi nhập xong dữ liệu khi dừng
B2: Đoạn lệnh sau đây in ra kết quả gì?
s:=0; while s<10 do begin s:=s+1;
Writeln(s); end;
A. In ra các số từ 1 đến 9.
B. In ra các số từ 1 đến 10.
C. In ra các số 1.
D. Không có đáp án đúng.
B3: Hãy cho biết đâu là đoạn lệnh lặp bằng câu lệnh While...do để tính tổng S=1+2+...+10?
A. S:=0; while i<10 do S:=S+i;
B. S:=0; i:=0; while i<11 do begin S:=S+i; i:=i+1; end;
C. S:=0; i:=1; while i do S:=S+i; i:=i+1;
D. S:=0; i:=0; while i<=10 do begin S:=S+i; i:=i+1; end;
thêm câu này nữa mn ạ:
Câu lệnh For i:= 3 to 10 do begin write(i); end; khi thực hiện xong sẽ viết ra số 13 7 10 14câu cuối ạ Cho câu lệnh sau: s:=0; For i:=1 to 5 do if i mod 2 = 0 then s:=s+i else s:= s+i; cho biết kết quả s ?
Điều kiện là s<=10
Câu lệnh là i:=i+1; s:=s+i;