Viết chương trinh tính tổng s= 1+3+5+7+…+99+100
python nha mn chứ trường mình k học pascal
Những câu hỏi liên quan
Câu 14: (3,0 điểm) Em hãy sử dụng câu lệnh lặp với số lần biết trước viết chương trinh Pascal để giải bài toán sau: Tính tổng S= 1 + 2 + 3 +...+n
Program HOC24;
var i,n: integer;
s: longint;
begin
write('Nhap n: '); readln(n);
s:=0;
for i:=1 to n do s:=s+i;
write('S = ',s);
readln
end.
Đúng 1
Bình luận (0)
cho tổng s= 1-2-3+4+5-6-7+8+9 -10-11 +12... n. viết chương trình nhập vào một số n tính tổng từ 1 đến n pascal
viết chương trình tính và đưa ra mh tổng s=1²+3²+5²..+99² mọi ng giúp mình với
#include <bits/stdc++.h>
using namespace std;
long long s,i;
int main()
{
s=0;
for (i=1; i<=100; i++)
if (i%2==1) s=s+i*i;
cout<<s;
return 0;
}
Đúng 0
Bình luận (0)
Mọi người giúp mình câu này với ạ :
Tính tổng : S= 1-2-3+4+5-6-7+8+9-10-11+12+...+n
Viết chương trình pascal nhập vào một số n tính tổng từ 1 đến n theo 2 cách
Viết chương trình pascal thực hiện tính toán các biểu thức sau:
a) 7.(8 + 5 -2)-30+12
b)(15+5)^2.(6+4)^3
(Mình đg cần mong mn giúp, thanks ạ)
b: uses crt;
begin
clrscr;
writeln(sqr(15+5)*sqr(6+4)*(6+4));
readln;
end.
Đúng 1
Bình luận (0)
-viết cấu trúc câu lệnh điều kiện . cho VD
- mô tả thuật toán cho bài toán tính tổng S= 1+2+3+...+50
viết chương trình pascal tính tổng của T:
T = \(\frac{1}{2}+\frac{1}{3}+\frac{1}{4}+...+\frac{1}{50}\)
đây là tin học lớp 8 nhé , mong mn giúp hộ
program chia;
uses crt;
var n,i:integer;
s:real;
begin
clrscr;
s:=0;
for i:=2 to 50 do s:=s+1/i;
writeln('Tong la ',s:1:2);
readln;
end.
Đúng 0
Bình luận (0)
Viết chương trình tính tổng S=1+2!+3!+.....+n! trong pascal
viết chương trình pascal tính tổng sau :
s= 1 + 1/2+1/3+1/4+...+1/100
Program HOC24;
var i: integer;
s: real;
begin
s:=0;
for i:=1 to 100 do s:=s+1/i;
write('S= ',s:2:2);
readln
end.
Đúng 1
Bình luận (0)
Viết chương trình pascal sử dụng lệnh while...do hoặc for to do để tính tổng S=1+3+5+...+n. N là số nguyên nhập từ bàn phím
Program HOC24;
var i,n: integer;
S: longint;
begin
write('Nhap N: '); readln(n);
i:=1; s:=0;
while i<=n do
begin
s:=s+i;
i:=i+2;
end;
write('S=',S);
readln
end.
Đúng 1
Bình luận (0)
program tinh_tong_S;
var
n, i, S: integer;
begin
write('Nhap n: ');
readln(n);
S := 0;
i := 1;
while i <= n do
begin
S := S + i;
i := i + 2;
end;
writeln('Tong S la: ', S);
readln;
end.
Đúng 0
Bình luận (0)