viết chương trình tính biểu thức: S= 1+2+3+...+100 . cảm ơn mn
K
Khách
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.
Những câu hỏi liên quan
10 tháng 3 2022
https://hoc247.net/hoi-dap/toan-6/tinh-1-1-2-1-3-1-4-1-100-faq172796.html
B
2
22 tháng 2 2022
uses crt;
var i,n,s:integer;
begin
clrscr;
readln(n);
s:=0;
for i:=1 to n do
s:=s+i*i;
writeln(s);
readln;
end.
5 tháng 4 2023
a)
program Tinh_S;
var
n, S: integer;
i: integer;
begin
write('Nhap gia tri cua n (30 <= n <= 90): ');
readln(n);
S := 0;
if (n >= 30) and (n <= 90) then
begin
for i := 1 to n do
S := S + i;
writeln('Gia tri cua bieu thuc S la: ', S);
end
else
writeln('Gia tri cua n khong hop le!');
readln;
end.
b)
program Tim_n;
var
n, S: integer;
begin
for n := 30 to 90 do
begin
S := 0;
for i := 1 to n do
S := S + i;
if S > 1000 then
begin
writeln('Gia tri cua n la: ', n);
break;
end;
end;
readln;
end.
5 tháng 4 2023
a)program Tinh_S;
var n,s,i:longint;
begin
s := 0;
write('Nhap n (30 <= n <= 90): ');
readln(n);
for i := 1 to n do
begin
s := s + i;
end;
writeln('Tong S la: ', s);
end.
b) program Tim_N;
var n,s,i: longint;
begin
s := 0;
n := 1;
while s <= 1000 do
begin
s := s + n;
n := n + 1;
end;
writeln('Gia tri n can tim la: ', n-1);
end.
21 tháng 10 2021
#include <bits/stdc++.h>
using namespace std;
long long a,b;
int main()
{
cin>>a>>b;
cout<<fixed<<setprecision(2)<<1/(a*1.0+b*1.0);
return 0;
}
3 tháng 12 2021
#include <bits/stdc++.h>
using namespace std;
int n,i;
double s;
int main()
{
cin>>n;
s=1;
for (i=2; i<=n; i++)
{
if (i%2==0) s=s+1/(i*1.0);
else s=s-1/(i*1.0);
}
cout<<fixed<<setprecison(2)<<s;
return 0;
}
AV
19 tháng 2 2022
uses crt;
var a:array[1..9,1..10] of integer;
m,n,j,i:longint;
begin
clrscr;
for i:=1 to 9 do
for j:=1 to 10 do
begin
inc(m);
a[i,j]:=m;
end;
writeln('mang vua nhap: ');
for i:=1 to 9 do
begin
for j:=1 to 10 do
write(a[i,j]:4);
writeln;
end;
readln;
end.
Mk đã giải đc r nên mk đăng lên cho bn nào cần nè.
1 tháng 7 2023
var i, so: integer;
begin
writeln('Nhap vao 10 so tu nhien:');
for i := 1 to 10 do
begin
write('So thu ', i, ': ');
readln(so);
writeln('So vua nhap la: ', so);
end;
readln;
end.
ML
15 tháng 5 2023
Program HOC24;
var i: byte;
s: longint;
begin
s:=1;
for i:=1 to 100 do s:=s*i;
write('S = ',s);
readln
end.
KV
16 tháng 5 2023
var i:integer;
s: longint;
begin
s:=1;
for i:=2 to 100 do s:=s*i;
write('S = ',s);
readln
end.
#include <bits/stdc++.h>
using namespace std;
long long i,s;
int main()
{
s=0;
for (i=1; i<=100; i++) s+=i;
cout<<s;
return 0;
}