Bài 10. Cấu trúc lặp

Phần khai báo tên chương trình, khai báo thư viện và khai báo biến
begin
clrscr;
write(`Hãy nhâp giá tri a vào:`);
readln(a);



Bước 1
Bước 2
Bước 3
Bước 4
Bước 5
Hãy nhâp giá tri a vào: 1
1
2
3
S = 0
a = 1
N = 0
S = 1
a = 1
N = 0
begin
clrscr;
write(`Hãy nhâp giá tri a vào:`);
readln(a);
S:= 1.0/a;



begin
clrscr;
write(`Hãy nhâp giá tri a vào:`);
readln(a);
S:= 1.0/a;
for N:=1 to 100 do




S = 1
a = 1
N = 1
begin
clrscr;
write(`Hãy nhâp giá tri a vào:`);
readln(a);
S:= 1.0/a;
for N:=1 to 100 do
S:= S+1.0/(a+ N);




S = 1+1/2
a = 1
N = 1
S = 1+1/2
a = 1
N = 2
S = 1+1/2+1/3
a = 1
N = 2
S = 1+1/2+1/3+...
a = 1
N = 2
S = 1+1/2+1/3+...
a = 1
N = 100
S = 1+1/2+1/3+... +1/101
a = 1
N = 100
S = 1+1/2+1/3+... +1/101
a = 1
N = 101
begin
clrscr;
write(`Hãy nhâp giá tri a vào:`);
readln(a);
S:= 1.0/a;
for N:=1 to 100 do
S:= S+1.0/(a+ N);
writeln(`Tông S là: `, S: 8 : 4);
readln;
end.




Hãy nhâp giá tri a vào: 1
Tông S là: 5.1973
Nhâp sô M nho hon N
M = 3
N = 13
M = 3 N = 13
I = 3
T = 3
I
M = 3 N = 13
I = 4
T = 3
M = 3 N = 13
I = 5
T = 8
M = 3 N = 13
I = 6
T = 14
M = 3 N = 13
I = 7
T = 14
M = 3 N = 13
I = 8
T = 14
M = 3 N = 13
I = 9
T = 23
M = 3 N = 13
I = 10
T = 33
M = 3 N = 13
I = 11
T = 33
M = 3 N = 13
I = 12
T = 45
M = 3 N = 13
I = 13
T = 45
Nhâp sô M nho hon N
M = 3
N = 13
Ket qua: 45