Tuyển Cộng tác viên Hoc24 nhiệm kì 26 tại đây: https://forms.gle/dK3zGK3LHFrgvTkJ6

Bài 7. Câu lênh lặp

TC

Bài 1 : viết chương trình tính P=3.4.5...n

Bài 2 : viết chương trình tinh S=13 +15 + 17 + ...(2n+1)

Bài 3 : viết chương trình tính P=12.14.16...2n

Bài 4 : viết chương trình tinh S=1/3.5 + 1/5.7 + 1/7.9 + ....1/(2n+1).(2n+3)

Ai đó giúp mình với mình cảm ơn

SU
29 tháng 6 2019 lúc 16:13

hi anh

Bình luận (0)
ML
30 tháng 6 2019 lúc 20:38

Lời giải:

Bài 1:

program hotrotinhoc;

var P: longint;

i,n: integer;

begin

write('n='); readln(n);

P:=1;

for i:=3 to n do

P:=P*i;

write(P);

readln

end.

Bài 2:

program hotrotinhoc;

var S: longint;

i,n: integer;

begin

write('n='); readln(n);

S:=1;

for i:=6 to n do

S:=S*((2*i)+1);

write(S);

readln

end.

Bài 3:

rogram hotrotinhoc;

var P: longint;

i,n: integer;

begin

P:=1;

for i:=6 to n do

P:=P*(2*i);

write(P);

readln

end.

Bài 4:

rogram hotrotinhoc;

var S: longint;

i,n: integer;

begin

P:=1;

for i:=1 to n do

P:=P*(1/(((2*n)+1)*((2*i)+3));

write(P);

readln

end.

Bình luận (0)

Các câu hỏi tương tự
TH
Xem chi tiết
NN
Xem chi tiết
LN
Xem chi tiết
NN
Xem chi tiết
NP
Xem chi tiết
LD
Xem chi tiết
TH
Xem chi tiết
NH
Xem chi tiết
YL
Xem chi tiết