Bài 1 : Viết chương trình tính tổng 1000 số nguyên đầu tiên bắt đầu từ 1
không dùng công thức.
Bài 2: Viết chương trình tính tổng 1000 số nguyên chẵn đầu tiên bắt đầu từ
1 không dùng công thức.
Bài 3: Viết chương trình nhập vào số tự nhiên N, xét xem số đó có phải là
số nguyên tố hay không.
1/
program oken;
var tong,i:integer;
begin
for i:=1 to 1000 do tong:=tong+i;
writeln(‘tong 1000 so dau tien: ‘,tong);
end.
2/
program oken;
var tong,i:integer;
begin
for i:=1 to 1000 do if i mod 2=0 then tong:=tong+i;
writeln(‘tong 1000 so dau tien: ‘,tong);
end.
3/
program oken31;
uses crt;
var n,i,dem,chan,le,dem2: integer;
kt:boolean;
begin
clrscr;
repeat
write(‘nhap so: ‘); readln(n);
if n mod 2=0 then
chan:=chan+n
else
begin
dem2:=dem2+1;
le:=le+n;
end;
for i:=2 to (n div 2) do
if n mod i =0 then dem :=dem+1;
if dem=0 then kt:=true;
if (n=0) or (n=1) or (dem>0) then kt:=false;
until kt=true;
writeln(‘tong cac so chan: ‘,chan);
writeln(‘trung binh cong cac so le: ‘,le/dem2:0:0);
readln;
end.
1
#include<bits/stdc++.h>
using namespace std;
int main()
{
int total=0;
for(int i=1;i<=1000;i++){
total+=i;
}
cout<<total;
//samon247
return 0;
}
2
#include<bits/stdc++.h>
using namespace std;
int main()
{
int total=0;
for(int i=1;i<=1000;i++){
if(i%2==0){
total+=i;}
}
cout<<total;
//samon247
return 0;
}
3
#include<bits/stdc++.h>
using namespace std;
bool snt(int n)
{
if(n < 2){
return false;
}
int count = 0;
for(int i = 2; i <= sqrt(n); i++){
if(n % i == 0){
count++;
}
}
if(count == 0){
return true;
}
else
{
return false;
}
}
int main()
{
int n;
cin >> n;
if(snt(n)){
cout<<n<<” la so nguyen to”;
return 0;
}
cout<<n<<” khong phai la so nguyen to”;
//samon247
return 0;
}