Baỡi tỏỷp Tin hoỹc aỷi cổồng 35
vaỡ (I<>E) vaỡ (T<>E) thỗ
Vióỳt (B,i,T,' x 8 = ',B,Y,T,E);
ỗnh

* Chổồng trpri \n");

0*b+10*i+t)*8)==(1000*b+100*y+10*t+e))
&&(y!=i)&&(y!=t)&&(y!=e)&&(i!=t)&&(i!=e)&&(i!=t)
d%d%d x 8=%d%d%d%d\n",b,i,t,b,y,t,e);
ồng trỗnh:
8 x 8 =
ỳu N leớ
N nóỳu N chụn

#include <stdio.h>
#include <conio.h>
#include <math.h>
void main()
{
clrscr();
int b,i,t,y,e;
ntf("Copyright by Nguyen Van Nguyen -Khoa CNTT-DHKT
for (b=1; b<=9; b++)
for (i=0; i<=9; i++)
for (t=0; t<=9; t++)
for (y=0; y<=9; y++)
e<=9; e++) for (e=0;

start = 2;
n; tng i lón 2 õồn vở
i;
ỡa ra maỡn hỗnh
Chổồng trỗnh
ngổồỹc laỷi
start = 1;
Cho i=start õóỳn i=
gthua =giaithua*
Vióỳt kóỳt quớa giai thổ+

*

start, i;
gthua = 1;

;
2;
lse
start = 1;
2)
!! = %ld", n, gthua);
F=P(1 +i/100)
n
chờnh laỡ sọỳ tióửn caớ vọỳn lỏựn laợi nhỏỷn õổồỹc sau n thaùng. Tyớ sọỳ
P thổồỡng õổồỹc tờnh vaỡ in ra thaỡnh baớng õóứ nhỏn vión ngỏn haỡng
ỷc ngổồỡi gổới tra cổùu. Tyớ sọỳ naỡy õổồỹc in ra thaỡnh baớng theo tố

#include <stdio.h>
#include <conio.h>

Nguyóựn Vn Nguyón- Khoa CNTT-TVT aỷi hoỹc Baùch Khoa aỡ Nụng
Baỡi tỏỷp Tin hoỹc aỷi cổồng 37
n 5% 6% 7% 8% 9% 10%
1 1.05000 1.06000 1.07000 1.08000 1.09000 1.10000
2 1.10250 1.12360 1.14490 1.16640 1.18810 1.21000
3 1.15763 1.19102 1.22504 1.25971 1.29503 1.33100
4 1.21551 1.26248 1.31080 1.36049 1.41158 1.46410
5 1.27628 1.33823 1.40255 1.46933 1.53862 1.61051
1852 1.50073 1.58687 1.67710 1.77156
1.60578 1.71382 1.82804 1.94872
1.71819 1.85093 1.99256 2.14359
.68948 1.83846 1.99900 2.17189 2.35795
2.36736 2.59374

* ùn:
6 1.34010 1.4
7 1.40710 1.50363
8 1.47746 1.59385
9 1.55133 1
10 1.62889 1.79085 1.96715 2.15892
Thuỏỷt toa
+
+
+ ', ' ':8); Vióỳt xuọỳng doỡng;
Di chuyóứn õóỳn toỹa õọỹ (4,n+1);
0)));
ỗnh

printf("n"," ");
j++) printf("%8d%",j);printf("\n"); for(j=5; j<=10;
(n=1; n<=10;n for
{
rintf("%d p
go
for(i=5;i<=10;i++) printf("%9f",exp(n*log(1+i/100)));
printf("\n");
}
getch();
}

Nguyóựn Vn Nguyón- Khoa CNTT-TVT aỷi hoỹc Baùch Khoa aỡ Nụng
Baỡi tỏỷp Tin hoỹc aỷi cổồng 38
11.Sọỳ tuyóỷt haớo laỡ sọỳ bũng tọứng caùc ổồùc sọỳ cuớa noù. Vờ duỷ 6 =1
+2
Vi ó tỏỳt caớ caùc sọỳ tuyóỷt haớo nhoớ hồn 1000
*
+3.
óỳt chổồng trỗnh lióỷt k
Thuỏỷt toaùn:
+ : i,j,tong
+
Be
=0 thỗ Tong=Tong +j;
ỳu Tong=i Thỗ
Vióỳt(' So tuyet hao la:',i);
o la:');
laỡm
hỗ Write(j, ' ');

for(i=1;i<=1000;i++)
{
tong=0;
for (j=1;j<=i-1; j++)
i i%j==0) tong=tong+j;
i tong==i) }
}
getch();
}
Nguyóựn Vn Nguyón- Khoa CNTT-TVT aỷi hoỹc Baùch Khoa aỡ Nụng
Baỡi tỏỷp Tin hoỹc aỷi cổồng 39
12.Vióỳt chổồng trỗnh nhỏỷp sọỳ M vaỡ tỗm sọỳ nhoớ nhỏỳt sao cho n!
>=
* ùn:
M.
Thuỏỷt toa
+ gt,m
Gaùn gt=1;
+ laỡm
ổỡng naỡo gt<=m;
+ nhat co n giai thua lon hon

float m
int i;
printf("nhap so
scanf("%f",&m);
gt=1;
i=0;
do
i++;
gt=gt*i;
} while (gt<=m);
printf(" So n nho nhat co n giai thua lon =%f la %d\n",m,i);
printf(" Giai t
getch();
}

13. Vióỳt chổồn
bỗnh cọỹng, trung

Thuỏỷt toaùn:
+ chióửu kióứu thổỷc.
+ :Sumtb,Ptb,A,i,n
+ A tổỡ baỡn phờm
Khai baùo maớng 1
Khai baùo 5 bióỳn
oỹc vaỡo n, maớng
+ Gaùn Ptb=1;
Nguyóựn Vn Nguyón- Khoa CNTT-TVT aỷi hoỹc Baùch Khoa aỡ Nụng
Baỡi tỏỷp Tin hoỹc aỷi cổồng 40
+ Gaùn Sumtb=0;
+Cho i=1 õóỳn n laỡm

#include <conio.h>
#include <math.h>

void main()
{
clrscr();
int a[1000],n,i;
float sumtb,ptb;
printf("\nNhap vao so phan tu nguye
scanf("%d",&n);
/* nhap mang 1 chieu*/
/*
for (i=1; i<=n; i++)
scanf("%d", &a[i]
/* Xu
/*
printf("Day da ch
for (
printf("%6d", a[i
ptb=1; sumtb=0
for(i=1;i<=n;i++)
{
sumtb=su

sumtb=sumtb/n;
ptb=sqrt(ptb);
printf("\nTrung binh cong cua day so sumtb=%f\n",sumtb);

getch();
}

Cho j=1 õóỳn i la
s:= S+ A[j];
P:=P*A[j];
Vióỳt tọứng caùc ch

*
tdio.h>
th.h>
;
],n,i,j,t;
p vao so phan tu nguyen cua day n :");
;
e (n>0);
s=s+a[j];
p=p*a[j];
printf(" Tong cac chu so cua so %d la %d\n",t,s);
#include <s
#include <conio.h>
#include <ma

void main()
{
clrscr()
int a[1000
int s,p;
printf("\nNha
scanf("%d",&n);
i=0; t=n;
do {
i++

+ Vióỳt i,j,k.

*

o.h>
hoa CNTT-DHKT\n");
c so nho hon 1000 co tong lap phuong cac chu so
<=9;i++)
=9;j++)
for(k=0; k<=9;k++)
if(i*i*i+j*j*j+k*k*k==100*i+10*j+k)
}
ỷt kó tỏỳt caớ caùc sọỳ nguyón tọỳ nhoớ hồn
t nhỏỷp tổỡ baỡn phờm.

#
include <stdi
#include <conio.h>
#include <math.h>
void main()
{
clrscr();
int i,j,k;
printf("Copyright by Nguyen Van Nguyen -K
printf("Ca
bang chinh no gom\n");
for(i=1; i
for(j=0; j<
n, i, j;
uyen Van Nguyen -Khoa CNTT-DHKT\n");
tri N : ");
);
o nguyen to nho hon n la : ");
for (j=2; j<i; j++)
i%j == 0)
break;
ỳt chổồng trỗnh nhỏỷp mọỹt sọỳ nguyón n vaỡ tờnh tọứng caùc chổợ

#include <std
#include <conio.

void main()

{
clrscr();
int
printf("Copyright by Ng
printf("\nNhap gia
scanf("%d", &n
printf("\nCac s
for (i=2; i<n; i++)
{

if (

if (j == i)
printf("%d ", i);
}


void main()

{
clrscr();
Tinh tong cac chu so\n");
n =");
;
{
s=s+ n%10;
=n/10;
intf("To
rỗnh tờnh tọứng
uyón n vaỡ sọỳ thổỷc x nhỏỷp tổỡ baỡn phờm.
int n,s,t;
printf("
printf("Nhap so
scanf("%d",&n);
s=0; t=n
do

n
} while (n>0);
pr ng cac chu so cua so %d la %d",t,s);
getch();
} 18. Vióỳt chổồng t


hỗ t=-exp(k*ln(x))
ổồỹc laỷi gaùn t=exp(k*ln(x));
.
ỗnh
+ Nóỳu n>
Gaùn S=1
Ch
Nóỳu (k mod 2) =0 t
Ng
S=s+t;
Vióỳt S
Ngổồỹc laỷi vióỳt s=1

* Chổồng tr
clude <stdio.h>
io.h> #in
#include <con
#include<math.h>

void main()

Nguyóựn Vn Nguyón- Khoa CNTT-TVT aỷi hoỹc Baùch Khoa aỡ Nụng
Baỡi tỏỷp Tin hoỹc aỷi cổồng 45
{
clrscr();
float s,x,t;
k;

19. Vióỳt chổồng t

s =

2
=
n
k
+
k
k
1
1vồùi n nhỏỷp tổỡ baỡn phờm
* Thuỏỷt t
ỳn S,n,i
oỹc giaù trở n tổỡ baỡn phờm.
s= s+ i/(i*i +1);
Vióỳt S.
hổồng trỗnh

+ Khai baùo caùc bió
+
+ Gaùn s=0;
+ Cho i=1 õóỳn n laỡm

L
i;
ntf(" Nhap so n=");
scanf("%f",&n);
for (i=1;i<=n;i++) s+=i/(i*i+1);
Gia tri tong S=%f",s);
getch();
ứng

*
clrscr();
float s,n,
pri

s=0;

printf("

}

20. Vióỳt chổồng trỗnh tờnh tọ

k 1
Thuỏỷt toaùn:
+ Khai baùo caùc bióỳn n,i,S,T
phờm
Gaùn s=1
aỡm
ỗ t=-1/i
i tong S

for(i=2; i<=n;i++)
{ s=s
} }
Nguyóựn Vn Nguyón- Khoa CNTT-TVT aỷi hoỹc Baùch Khoa aỡ Nụng
Baỡi tỏỷp Tin hoỹc aỷi cổồng 47 Vióỳt chổồng trỗnh tờnh tọ21. ứng
=
+=+++
1

11
n
k
kn
kn
1
3
1
10


#include <stdio.h>
#include <conio.h>
#include <math.h>
void main
{
clrscr();
float s,t,
pri

s=10;

printf(" ket qua
getch();
}

.Nhỏỷp n tổỡ baỡn phờm. Tỗm tỏ22

*

io.h>
o gia tri N = ");

#
include <std
#include <conio.h>

void main()
{
clrscr();

1
3
1
1
4
++=
N

Epsilon<
1
4
õổ

N +2
Chổồng Trỗn
io.h>

in()
n,buoclap;
p=0; n=3;
(fabs(b)>epsilon)
uoclap++;
}
printf(" So pi la=%5f\n",a*4);
printf(" So pi ham chuan=%5f\n",M_PI);
f",buoclap);
getch();

#include <std
#include <conio.h>


()
S= Sin(x) = x -
!3
+
3
x
!5
- + (-1)
x
5
!
* Thuỏỷt toaùn:
+ coù hũng epsilon
+ Kha
+ Nhỏ aỡn phờm.
õọỹ : x=x*pi/180
Chổỡng naỡo fabs(a)>=eps laỡm
*(i-1))));
haỡm chuỏứn õóứ so saùnh.
ỗnh
thóứ khai
i baùo caùc bióỳn s,x,a,i
ỷp x tổỡ b
+ coù thóứ õọứi x sang
+ Gaùn s=0; a=x; i=3;
+
s=s+a;
a=a*(-(x*x/(i
i=i+2;

s1=0; a1=x;i=3;
/* Tinh the
/*
while (fabs(a1)>=epsilon)
{
s1+=a1;
a1
i=i
}
/*
/* Tinh the
s2=0; a2=x;k=3;

{
s2+=a2;
Nguyóựn Vn Nguyón- Khoa CNTT-TVT aỷi hoỹc Baùch Khoa aỡ Nụng
Baỡi tỏỷp Tin hoỹc aỷi cổồng 50
a2=a2*(-(x*x/(k*(k-1))));
k=k+2;
}while (fabs(a2)>=epsilon);
qua theo do while =%f\n", s2);
a o sin(x));
. Vióỳt chổồng trỗnh tờnh S bũng 2 voỡng lỷp vaỡ in kóỳt quaớ nhổ

printf("Ket qua theo while =%f\n", s1);
printf("Ket
printf("ket qu the ham chuan=%f",
getch();
}


o while*/
*/
a*(-(x*x/(i*(i-1))));
+2;
*/
o do while*/
+

#include <s
#include <
#include <math.h>
#define epsilon 0.00000001
void main()
{
clrscr();
int
float i,j,
printf(" BANG TRA
printf(" DO WHILE DO_WHILE
/*
for(j=1;j<=18;j++)
{
d=j*10;
x=d*
/*
s=0; a=x;i=3;
/* Tinh the
/*
while (fabs(a)>=epsilon)
{

n
S = Cos(x) = 1 -
!2
2
x
+
!4
4
x
- + (-1)
* Thuỏỷt toaùn:
+ coù hũng epsilon
+ Kha
+ Nhỏ aỡn phờm.
õọỹ : x=x*pi/180
Chổỡng naỡo abs(a)>=eps lam
a=a*(-(x*x/(i*(i-1))));
i=i+2;
haỡm chuỏứn õóứ so saùnh.
thóứ khai
i baùo caùc bióỳn s,x,a,i
ỷp x tổỡ b
+ coù thóứ õọứi x sang
+ Gaùn s=0; a=1; i=2;
+
s=s+a;
+ Vióỳt kóỳt quaớ s.
+ Vióỳt kóỳt quaớ theo

* Chổồng trỗnh