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
2 câu trả lời
1.
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.
2.
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.
3.
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.
4.
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.
5.
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.
6.
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.
7.
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.
8.
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.
9.
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!
1.
#include <iostream>
using namespace std;
int main() {
int s=0;
for(int i=1;i<=500;i++){
s+=i;
}
cout<<s;
//samon247
return 0;
}
2.
#include <iostream>
using namespace std;
int main(){
double s=1;
for(double i=1;i<=50;i++){
s*=i;
}
cout<<s;
//samon247
return 0;
}
3.
#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;
}
4.
#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;
}
5.
#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;
}
6.
#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;
}
7.
#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;
}
8.
#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;
}
9.
#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;
}
Câu hỏi trong lớp
Xem thêm
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết giúp các em luyện tập và củng cố kiến thức hiệu quả
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 5 Địa 8 có lời giải chi tiết
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 4 Địa 8 có lời giải chi tiết
