1) Xác định giá trị đầu, giá trị cuối, số lần lặp, giá trị S trong câu lệnh sau
S:=0
For i:=1 to 5 do S:= S+1/i
2) Viết chương trình tính tổng nghịch đảo S=1+1/2+1/3+...+1/N với N được nhập từ bàn phím
Viết chương trình tính tổng nghịch đảo N số tự nhiên S= 1+1/2+1/3+...+1/N với N được nhập từ bàn phím. (sử dụng câu lệnh lặp for...do hoặc while...do...). Giúp e với ạ
Program HOC24;
var i,n: integer;
S: real;
begin
write('Nhap N: '); readln(n);
s:=0;
for i:=1 to N do s:=s+1/i;
write('S= ',s:5:2);
readln
end.
I. PHẦN LÍ THUYẾT
câu 1:cho đoạn chương trình sau:
S:=0;
For i:= 1 to 6 do S:=S+i;
Tính giá trị của S?
II. PHẦN BÀI TẬP:
câu 1: Viết chương trình tính tích của 10 số tự nhiên đầu tiên.
Câu 2: Hãy phát biểu sự khác biệt giữa câu lệnh lặp với số lần lặp cho trước và câu lệnh lặp với số
lần lặp chưa biết trước.
Câu 3: Hãy tìm hiểu đoạn chương trình Pascal sau đây và cho biết với đoạn lệnh đó chương trình
thực hiện bao nhiêu vòng lặp?
S:=1; n:=0;
While S <=10 do
Begin
n:=n+1;
S:=S+n;
End;
cho biết số vòng lặp và giá trị của biến s sau khi thực hiện đoạn chương trình: a) S:=0;
For i:=2 to 8 do S :=S+i
b) S:=0; n:=1;
For i:=1 to 6 do
Begin
S:=S+n;
n:=n+i;
end;
c) S:=2;
For i:=1 to 10 do
If(i mod 2)=0 then S:=S+i;
d) S:=0; i:= 1,5;
While S<7 do S:=S+i;
e) S:=0; i:=1;
While i<9 do
Begin
S:=S+i;
i:=i+2;
End;
f) S:=2; i:=1;
While i<= 10 do
Begin
If (i mod 2) then S:=S+i;
i:=i+1;
End;
cho đoạn lệnh, hãy thực hiện các lệnh trong đoạn chương trình và cho biết sau khi thực hiện giá trị biến s,i bằng bao nhiều có bap nhiều vòng lặp trong câu lệnh s:=0;
for i:=1 to 10 do s:=s+1;
Cho đoạn chương trình sau: S:=1; For i:=3 to 6 do S :=S + i;
+ Tính số vòng lặp.
+ Kẻ bảng tính giá trị của i, T trong số lần lặp khi thực hiện đoạn chương trình?
Câu 14: Cho đoạn chương trình sau:
S:=0;
For i:=1 to 1 do S:=S+1;
Sau khi chạy đoạn chương trình trên, giá trị S là:
A. S=100. B. S=0. C. S=1. D. Không xác định.
Câu 14: Cho đoạn chương trình sau:
S:=0;
For i:=1 to 1 do S:=S+1;
Sau khi chạy đoạn chương trình trên, giá trị S là:
A. S=100. B. S=0. C. S=1. D. Không xác định.
Sau khi thực hiện đoạn chương trình sau:
S:=0; P:=1;
For i:=1 to n do
begin
S:=S+i; P:=P*i
end.
Nếu n = 5 thì:
a) Câu lệnh lặp trên được thực hiện bao nhiêu lần?
b) Giá trị của P,S sau khi thực hiện chương trình trên
n:=0;
for i:= 1 to 10 do n:=n+i;
Giải thích : n:=n+i nghĩa là giá trị ban đầu cộng lần lượt với i ( dãy số từ 1 đến 10) n sẽ thay đổi giá trị sau mỗi lần cộng
Hoạt động của câu lệnh :
Vòng 1 : n:=n+i; <=> n=0+1=1;
Vòng 2: n:=n+i <=> n=1+2=3 ;
Vòng 3 : n:=n+i <=> n=3+3=6;
Vòng 4: n:=n+i <=> n=6+4=10;
Vòng 5 : n:=n+i <=> n=10+5=15;
Vòng 6 : n:=n+i <=> n=15+6=21;
Vòng 7: n:=n+i <=> n=21+7=28;
Vòng 8 : n:=n+i <=> n=28+8=36;
Vòng 9 : n:=n+i <=> n=36+9=45;
Vòng 10 : n:=n+i <=> n=45+10=55;
Vậy đoạn chương trình trên có giá trị n=55
TL:
n = 55 nhé
@@@@@@@@@@@@
k cho mk
HT
tham khảo ạ
n:=0;
for i:= 1 to 10 do n:=n+i;
Giải thích : n:=n+i nghĩa là giá trị ban đầu cộng lần lượt với i ( dãy số từ 1 đến 10) n sẽ thay đổi giá trị sau mỗi lần cộng
Hoạt động của câu lệnh :
Vòng 1 : n:=n+i; <=> n=0+1=1;
Vòng 2: n:=n+i <=> n=1+2=3 ;
Vòng 3 : n:=n+i <=> n=3+3=6;
Vòng 4: n:=n+i <=> n=6+4=10;
Vòng 5 : n:=n+i <=> n=10+5=15;
Vòng 6 : n:=n+i <=> n=15+6=21;
Vòng 7: n:=n+i <=> n=21+7=28;
Vòng 8 : n:=n+i <=> n=28+8=36;
Vòng 9 : n:=n+i <=> n=36+9=45;
Vòng 10 : n:=n+i <=> n=45+10=55;
Vậy đoạn chương trình trên có giá trị n=55