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.
Câu 2:
#include <bits/stdc++.h>
using namespace std;
double p1,p2;
int i,n;
int main()
{
cin>>n;
p1=1;
p2=1;
for (i=1; i<=n; i++)
{
if (i%2==0) p2=p2*(i*1.0);
else p1=p1*(i*1.0);
}
cout<<fixed<<setprecision(2)<<p1<<endl;
cout<<fixed<<setprecision(2)<<p2;
return 0;
}
#include <bits/stdc++.h>
using namespace std;
long long s,i,n;
int main()
{
cin>>n;
s=0;
for (i=1; i<=n; i++)
s=s+i;
cout<<s;
return 0;
}
b)
uses crt;
var i,n:integer;
t:real;
begin
clrscr;
write('Nhap n='); readln(n);
i:=1;
t:=0;
while i<=n do
begin
t:=t+1/(i*(i+3));
i:=i+1;
end;
writeln(t:4:2);
readln;
end.
bài 1
program: Tinh _Tong;
var: i,n:integer;S:real;
begin
writeln('nhap so n=');readln(n);
S:=0;
for i:=1 to N do S:=S+1/i*(i+2);
write('tong can tim la',S:0:2);
readln;
end.
bài 2
program:Tinh_tong_2;
var:i,n:integer;S:real;
begin
writeln('nhap so N=');
readln(n);
S:=0;
for i:=1 to N do S:=S+1/i;
writeln('tong can tim la',);
readln;
end.
(bài được làm bởi người giỏi tin nhất khối 8 trường Phạm Đình Quy.)
*B=2+4+6+...+2020
uses crt;
var b:real;
i:integer;
begin
clrscr;
b:=0;
i:=0;
while i<=2020 do
begin
i:=i+2;
b:=b+i;
end;
writeln(b:0:0);
readln;
end.
*C=1/3+1/6+1/9+...+1/3n
uses crt;
var c:real;
i,n:integer;
begin
clrscr;
write('Nhap n='); readln(n);
c:=0;
i:=1;
while i<=n do
begin
c:=c+1/(3*i);
i:=i+1;
end;
writeln(c:4:2);
readln;
end.
#include <bits/stdc++.h>
using namespace std;
long long i,n,s;
int main()
{
cin>>n;
i=0;
s=0;
while (i<=n)
{
if (i%2==0) s=s-i;
else s=s+i;
}
cout<<s;
return 0;
}
1.
Var i : integer;
S : real;
Begin
S:= 0
For i:= 1 to 6 do S:= S+(i - (i+1));
Write (S);
Readln;
End.
2.
Var i : integer;
S : real;
Begin
S:= 0
For i:= 1 to 6 do S:= S+((i+1)/i);
Write (S);
Readln;
End.
Lời giải :
a) write('nhap n='); readln(n);
S1:=0;
for i:=1 to n do S1:= S1+i;
write(S1);
b) S2:=0;
for i:= 1 to 12 do S2:=S2+i;
write(S2);
c) write('nhap n='); readln(n);
S3:=0;
for i:= 1 to n do
if i mod 2 =0 then S3:=S3+i;
write(S3);
d) S4:=0;
for i:=1 to 32 do
if i mod 2 =0 then S4:=S4+i;
write(S4);
e) write('nhap n='); readln(n);
S5:=0;
for i:=1 to n do
if i mod 2=1 then S5:=S5+i;
write(S5);
f) S6:=0;
for i:= 1 to 39 do
if i mod 2=1 then S6:=S6+i;
write(S6);
cảm ơn bạn nhưng nếu chỉ viết câu lệnh thì mình viết như thế hả.??