TRẢ LỜI

Có thể bạn quan tâm

Tìm×

Tìm kiếm với hình ảnh

Vui lòng chỉ chọn một câu hỏi

Tìm đáp án

- Đăng nhập
- |
- Đăng ký

Hoidap247.com Nhanh chóng, chính xác

Hãy đăng nhập hoặc tạo tài khoản miễn phí!

Đăng nhậpĐăng ký

Đặt câu hỏi

logo

Lưu vào

+
Danh mục mới

Lưu

aqgghkrc
Chưa có nhóm

Trả lời
1
Điểm
39
Cảm ơn
1

Tin Học
Lớp 8
60 điểm
aqgghkrc - 15:08:58 27/05/2020

1. Viết chương trình tính tổng từ 1 đến 100. 2. Viết chương trình tính tích từ 1 đến 50 3. Viết chương trình tính dãy số thập phân từ 1+1/2+1/3+1/4+...+1/n 4. Viết chương trình tính dãy số thập phân từ 1+1/3+1/5+1/7+1/9 5. Viết chương trình tính dãy số thập phân từ 1+1/2+1/4+1/6+1/8. 6. Nhập vào 1 số nguyên n . In ra tổng các số từ 1 - n 7. Tính tổng các số chẵn từ 1 đến n, với n được nhập từ bàn phím 8. Ta kí hiệu n! là tích n số tự nhiên đầu tiên: n! = 1.2.3...n. Viết chương trình tính n! với n là số tự nhiên được nhập vào từ bàn phím. 9.Em hãy viết chương trình tính tổng các số nguyên liên tiếp từ n đến m với n, m là các số nguyên dương nhập vào từ bàn phím. 10.Viết chương trình tính tổng bình phương các số tự nhiên từ 1 đến n, biết giá trị của n được nhập vào từ bàn phím 11. Viết chương trình xuất ra các bội số của B trong phạm vi từ 1 đến N, với giá trị B, N được nhập vào từ bàn phím

Hỏi chi tiết
Báo vi phạm

Hãy luôn nhớ cảm ơn và vote 5* nếu câu trả lời hữu ích nhé!

TRẢ LỜI

Datdoan03
Chưa có nhóm

Trả lời
869
Điểm
24096
Cảm ơn
642

Datdoan03

Câu trả lời hay nhất!
27/05/2020

Đây là câu trả lời đã được xác thực

Câu trả lời được xác thực chứa thông tin chính xác và đáng tin cậy, được xác nhận hoặc trả lời bởi các chuyên gia, giáo viên hàng đầu của chúng tôi.

program b1;

uses crt;

var S:integer;

i:integer;

begin clrscr;

S:=0;

for i:=1 to 100 do

S:=S+i;

write('Tong tu 1 den 100 la: ',S);

readln;

end.

program b2;

uses crt;

var T:integer;

i:integer;

begin clrscr;

T:=1;

for i:=1 to 50 do

T:=T*i;

write('Tich tu 1 den 50 la: ',T);

readln;

end.

program b3;

uses crt;

var S:integer;

i,n:integer;

begin clrscr;

writeln('Nhap 1 so n: '); readln(n);

S:=0

for i:=1 to n do

S:=S+1/i;

write('Tong day so la: ',S);

readln;

end.

program b4;

uses crt;

var S:integer;

i:integer;

begin clrscr;

S:=0

for i:=1 to 9 do

if i mod 2<>0 then

S:=S+1/i;

write('Tong day so la: ',S);

readln;

end.

program b5;

uses crt;

var S:integer;

i:integer;

begin clrscr;

S:=0

for i:=1 to 8 do

if i mod 2=0 then

S:=S+1/i;

write('Tong day so la: ',S);

readln;

end.

program b6;

uses crt;

var S:integer;

i,n:integer;

begin clrscr;

writeln('Nhap 1 so n: '); readln(n);

S:=0;

for i:=1 to n do

S:=S+i;

write('Tong la: ',S);

readln;

end.

program b7;

uses crt;

var S:integer;

i,n:integer;

begin clrscr;

writeln('Nhap 1 so n: '); readln(n);

S:=0;

for i:=1 to n do

if i mod 2=0 then

S:=S+i;

write('Tong la: ',S);

readln;

end.

program b8;

uses crt;

var T:integer;

i,n:integer;

begin clrscr;

writeln('Nhap 1 so n: '); readln(n);

T:=1;

for i:=1 to n do

T:=T*i;

write('n! la: ',T);

readln;

end.

program b9;

uses crt;

var S:integer;

i,n,m:integer;

begin clrscr;

writeln('Nhap n va m: '); readln(n,m);

S:=0;

for i:=n to m do

S:=S+i;

write('Tong la: ',S);

readln;

end.

10.

program b10;

uses crt;

var S:integer;

i,n:integer;

begin clrscr;

writeln('Nhap 1 so n: '); readln(n);

S:=0;

for i:=1 to n do

S:=S+i*i;

write('Tong la: ',S);

readln;

end.

11.

program b11;

uses crt;

var b:integer;

i,n,B:integer;

begin clrscr;

writeln('Nhap so n va B: '); readln(n,B);

b:=0;

for i:=B to n do

if i mod B=0 then

write('Boi cua B la: ',b);

readln;

end.

Học tốt!

Hãy giúp mọi người biết câu trả lời này thế nào?

avatar

starstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstar5starstarstarstarstar3 voteGửiHủy

Cảm ơn 2

- Datdoan03
- Chưa có nhóm
- Trả lời
  869
- Điểm
  24096
- Cảm ơn
  642
m xin câu tlnt

Đăng nhập để hỏi chi tiết avatar

samon247
Chưa có nhóm

Trả lời
320
Điểm
1263
Cảm ơn
165

samon247

24/07/2020

Đây là câu trả lời đã được xác thực

Câu trả lời được xác thực chứa thông tin chính xác và đáng tin cậy, được xác nhận hoặc trả lời bởi các chuyên gia, giáo viên hàng đầu của chúng tôi.

#include <iostream>using namespace std;int main() { int s=0; for(int i=1;i<=500;i++){ s+=i; } cout<<s; //samon247 return 0;}

#include <iostream>using namespace std;int main(){ double s=1; for(double i=1;i<=50;i++){ s*=i; } cout<<s; //samon247 return 0;}

#include <iostream>using namespace std;int main(){ float n,s=0; cin>>n; for(float i=1;i<=n;i++){ s+=1/i; } cout<<s; //samon247 return 0;}

#include <iostream>using namespace std;int main(){ float s=0; for(float i=1;i<=9;i++){ if((int)i%2==1){ s+=1/i; } } cout<<s; //samon247 return 0;}

#include <iostream>using namespace std;int main(){ float s=0; for(float i=1;i<=9;i++){ if((int)i%2==0){ s+=1/i; } } cout<<s; //samon247 return 0;}

#include <iostream>using namespace std;int main() { int n,S=0; cin>>n; for(float i=1;i<n;i++){ S+=i; } cout<<S; //samon247 return 0;}

#include <iostream>using namespace std;int main() { int n,S=0; cin>>n; for(float i=1;i<n;i++){ if((int)i%2==0){ S+=i; } } cout<<S; //samon247 return 0;}

#include <iostream>using namespace std;int main() { int s=1,n; cin>>n; for(int i=1;i<=n;i++){ s*=i; } cout<<s; //samon247 return 0;}

#include <iostream>using namespace std;int main() { int s=0,m,n; cin>>m>>n; for(;m<=n;m++){ s+=m; } cout<<s; //samon247 return 0;}

10.

#include <iostream>using namespace std;int main() { int s=0,n; cin>>n; for(int i=1;i<=n;i++){ s+=i*i; } cout<<s; //samon247 return 0;}

11.

#include <iostream>using namespace std;int main() { int B,n; cin>>B>>n; for(int i=1;i<=n;i++){ if(i%B==0){ cout<<i<<" "; } } //samon247 return 0;}

Hãy giúp mọi người biết câu trả lời này thế nào?

starstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstar5starstarstarstarstar1 voteGửiHủy