Hỏi đáp về Bài thực hành 6: Sử dụng lệnh lặp While…Do - Tin học 8

Cho đoạn chương trình sau:

S:=0; n:=0;

While S<=10 do

Begin

n:=n+1

S:=S+n

End;

 Nêu cú pháp và hoạt động của câu lệnh lặp với số lần không biết trước? kết thúc đoạn chương trình sau, máy tính thực hiện bao nhiêu vòng lặp và giá trị của K bằng bao nhiêu?

K:=0;

While K<5 do K:= K+1;

giúp mik vs xin mọi ng

dùng lệnh while... do... tìm số lớn nhất sao cho S = 1 + 1/2 + 1/3 + ... +1/n < 4

1 người gửi tiết kiệm số tiềm là a triệu đồng, lãi suất là k/tháng( cứ sau mỗi tháng, tiền lại được cộng vào tiền gốc để tính lãi cho tháng sau). viết chương trình tính số tháng phải giữ để người đó nhận đuócos tiền không ít hơn b triêu đồng. với a,b,k được nhập từ bàn phím tin 8

cho s=1+3+5+...+n. tìm s,n sao cho tổng s đầu tiên lớn hơn 100

Lập trình tính tổng S= 2+4+6+8+...+50 (sử dụng lệnh while do)?

1. Viết chương trình nhập vào 1 số a. Nếu a không phải là số dương thì nhập lại, đến khi nào là
số dương thì dừng.
Gợi ý: - Nhập a
- While a < 0 do readln(a);

2. Viết chương trình nhập vào 1 số a. Nếu a không phải là số chẵn thì nhập lại, đến khi nào là số
chẵn thì dừng. (Gợi ý: tương tự bài : đk a mod 2 <> 0)
3. Viết chương trình tính tổng số nguyên từ 1-n, n là số nguyên nhập từ bàn phím. Sử
dụng vòng lặp while... do
while i<=n do
begin
i:=i+1;
s:=s+i;
end;
4. Tính S=1+1/2=1/3+1/4+...
Dừng khi 2-S<0.01
Gợi ý: tương tự bài 3 đk là: while 2-s<0.01 do ...

viết chương trình tính tổng s=2+4+6+...+n

• Cho đoạn chương trình sau tính tổng S=?

  i:=1; s:=3;

  While i<=5 do

  begin s:=s+i; i:=i+1 ; end;

  15

  18

  3

  20

•  

a) A= 1+2+3+...+10

b) B= 1+2+3+...+50

c) C= 1+2+3+...+N ( N: sô tự nhiên )

GIÚP VỚI