Bài tập Tin học Đại cương part 4 ppsx

Baỡi tỏỷp Tin hoỹc aỷi cổồng 52
while (fabs(a1)>=epsilon)
{
s1+=a1;
a1=a1*(-(x*x/(i*(i-1))));
+2;
*/
o do while*/
do
}while (fabs(a2)>=epsilon);
printf("Ket qua theo while =%f\n", s1);
a o l %f\n", s2);
theo ham chuan=%f",cos(x));
i=i
}
/*
/* Tinh the
s2=0; a2=1;k=2;

{
s2+=a2;
a2=a2*(-(x*x/(k*(k-1))));
k=k+2;


printf("Ket qu the do whi e =
printf("ket qua
getch();
}
tờnh 27. Vióỳt chổồng trỗnh
S = Sh(x) = x +

3
3!
x
+
5
x
+
21
21
n
x
n
+
+()
5!
+
!

* Thuỏỷt toaùn:
+ coù hũng epsilon
+ Kha ,sh
+ Nhỏ aỡn phờm.
/exp(x))/2
Chổỡng naỡo a >=eps lam
a=a*(x*x/(i*(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

+ Gaùn sh=(exp(x) -1
+ Gaùn s=0; a=x; i=3;
+
s=s+a;
i=i+2;
+ Vióỳt kóỳt quaớ s.
+ Vióỳt kóỳt quaớ theo

* Chổồng tr
io.h>
0.00000000000001
+

#include <std
#include <conio.h>
#include <math.h>
#define epsilon
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 53
clrscr();
float s1,s2,x,a1,a2,i,k,shx;
f(" Nhap x=");
&x);
-1/(exp(x)))/2;
o while*/
*/
=a1*(x*x/(i*(i-1)));
+2;

*/
o do while*/
x/(k*(k-1)));
k=k+2;
n);
pri a theo while %f\n", s1);
pri a theo do hile =%f\n", s2);
theo ham chuan=%f",shx);
print
scanf("%f",
s1=0; a1=x;i=3;shx=(exp(x)
/* Tinh the
/*
while (fabs(a1)>=epsilon)
{
s1+=a1;
a1
i=i
}
/*
/* Tinh the
s2=0; a2=x;k=3;
do
{
s2+=a2;
a2=a2*(x*

}while (fabs(a2)>=epsilo
ntf("Ket qu =
ntf("Ket qu w

printf("ket qua
getch();
}
tờnh 28. Vióỳt chổồng trỗnh
S = ch(x) = 1 +
xx x
n2
+++

24
n
2()!24!!
* Thuỏỷt toaùn:
+ coù hũng epsilon
+ Kha ,ch
+ Nhỏ aỡn phờm.
/exp(x))/2
lam
s=s+a;
1)));
saùnh.
ỗnh
thóứ khai
i baùo caùc bióỳn s,x,a,i
ỷp x tổỡ b
+ Gaùn ch=(exp(x) +1
+ Gaùn s=0; a=1; i=2;
+ Chổỡng naỡo a>=eps
a=a*(x*x/(i*(i-
i=i+2;

+ Vióỳt kóỳt quaớ s.
+ Vióỳt kóỳt quaớ theo haỡm chuỏứn õóứ so
* Chổồng tr
io.h>
+

#include <std
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 54
#include <conio.h>
0000000001
;
f(" Nhap x=");
&x);
x)+1/exp(x))/2;;
o while*/
*/
=a1*(x*x/(i*(i-1)));
+2;
*/
o do while*/
do
}while (fabs(a2)>=epsilon);
=%f\n", s1);
. Sồ õọử Horner õóứ tờnh õa thổùc P(x) = a
n
x
n
+ a
n-1

x
n-1
+ + a
1
x
+ (a
1
+(a
2
+ (
n
.)x)x. Vióỳt chổồng trỗnh nhỏỷp
ỳ õa thổùc a
0
,a
1
, ,a
n
vaỡ x rọửi duỡng sồ õọử Horner õóứ
.
toaùn:
#include <math.h>
#define epsilon 0.00
void main()
{
clrscr();
/* Tinh chx */
float s1,s2,x,a1,a2,i,k,chx
print
scanf("%f",

s1=0; a1=1;i=2; chx=(exp(
/* Tinh the
/*
while (fabs(a1)>=epsilon)
{
s1+=a1;
a1
i=i
}
/*
/* Tinh the
s2=0; a2=1;k=2;

{
s2+=a2;
a2=a2*(x*x/(k*(k-1)));
k=k+2;


printf("Ket qua theo while
printf("Ket qua theo do while =%f\n", s2);
printf("ket qua theo ham chuan=%f",chx);
getch();
}
29
+ a
0
õổồỹc bióứu dióựn nhổ sau:
.+ (a )x)
P(x) =a

0
maớng hóỷ sọ
tờnh giaù trở P(x)
* Thuỏỷt
hỏỷp n

+ Khai baùo caùc bióỳn : n,i,f,x,a
+ laỡm
N
Chổỡng naỡo n<0.
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 55
+ Nhỏỷp x
+ Gaùn f=0
+ Cho i=n xuọỳng 0 laỡm f=f*x +a.
aỡn hỗnh.
ỗnh
+ Vióỳt f ra m

* Chổồng tr
tdio.h>
<math.h>
("%f",&n);
);
f",&x);
i=n; i>=0; i )
Nhap a%d=",tt);
scanf("%f",&a);
}
",f);

fibonaxi 1 1 2 3 5 8 13 21 34 55 . . .
Chổồng trỗnh
#include <s
#include <conio.h>
#include
void main()
{
clrscr();
int tt;
float f,a,x,i,n;
do {
printf(" Nhap n=");
scanf
} while (n<0);
printf(" Nhap x="
scanf("%
f=0; tt=0;
for(
{
printf("

tt++;
f=(f*x)+a;

printf(" f(x)=%f
getch();
}
30. Tao daợy
*
cr();

b2 = 1, fib = 2;
N : ");

, fib1, fib2);
le (fib1+fib2 < n)

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

void main()
{
clrs
int n, i, fib1 = 1, fi
printf("\nNhap gia tri
scanf("%d", &n);
printf("%d %d "
whi
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 56
{
fib = fib1 + fib2;
printf("%d ", fib);
fib2 = fib1;
fib1 = fib;
}
getch();

}

Nguyãùn Vàn 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 57
Phỏửn IV : CHặNG TRầNH CON
1. Vióỳt chổồng trỗnh(duỡng chổồng trỗnh con laỡ haỡm)õóứ tờnh
!5
5
x
- + (-1)
n
21
21
n
x
n

()
S= Sin(x) = x -
!3
x

3
+
!

* Thuỏỷt toaùn:


Thuỏỷt toaùn nhổ baỡi ồớ phỏửn III nhổng vióỳt laỷi chổồng trỗnh con
g trỗnh
dổồùi daỷng haỡm.
* Chổồn
nio.h>
tdio.h>
0.000000000001
at x);

at x;
("%f",&x);
m=%f\n",tinh(x));
sin(x));
inh(float x)
eo while*/
*/
s=0;
ile (fabs(a)>=epsilon)
{
s+=a;
i=i+2;
return s;

+

#include <co
#include <s
#include <math.h>
#define epsilon
float tinh(flo
main()
{
clrscr();
flo
printf("nhap x=");
scanf
x=x*M_PI/180;
printf(" ket qua theo ha
printf(" ket qua theo ham chuan=%f\n",
getch();
}
float t
{
float a,s,i;
/* Tinh th
/*
a=x; i=3;
wh


a=a*(-(x*x/(i*(i-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 58
2. Vióỳt chổồng trỗnh(duỡng chổồng trỗnh con laỡ haỡm)õóứ tờnh
!2
2
x
+
!4
4
x
- + (-1)
n
)!2(
2n
n
x
S = Cos(x) = 1 -
* Thuỏỷt toaùn:

Thuỏỷt toaùn nhổ baỡi ồớ phỏửn III nhổng vióỳt laỷi chổồng trỗnh con
dổồùi daỷng haỡm.
* Chổồng trỗnh

#include <conio.h>
dio.h>
ath.h>
.000000000001
x);

ntf("nhap x=");
_PI/180;
theo ham=%f\n",tinh(x));
m chuan=%f\n",cos(x));
s,i;
*/
=2; s=0;
a)>=epsilon)
s+=a;
i=i+2;

Vióỳt chổồng trỗnh laỡ haỡmõóứ tờnh

#include <st
#include <m
#define epsilon 0
float tinh(float
main()
{
clrscr();
float x;
pri
scanf("%f",&x);
x=x*M
printf(" ket qua
printf(" ket qua theo ha
getch();
}
float tinh(float x)
{

float a,
/* Tinh theo while*/
/*
1; i a=
while (fabs(
{
a=a*(-(x*x/(i*(i-1))));
}
return s;
}

3.
S = Sh(x) = x +
3
3
x
!
+
5
x
5!
+ +
21n
x
+
+
21n +()!

+ . . .

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 59
Thuỏỷt toaùn:

Thuỏỷt toaùn nhổ baỡi ồớ phỏửn III nhổng vióỳt laỷi chổồng trỗnh con
g trỗnh
dổồùi daỷng haỡm.

* Chổồn
nio.h>
o.h>

shx=(exp(x)-1/exp(x))/2;
am=%f\n",tinh(x));
m chuan=%f\n",shx);
*/
x; i=3; s=0;
a)>=epsilon)
a (i-1)));
i=i+2;
return s;
nh (coù duỡng chổồng trỗnh con) tờnh
S = ch(x) = 1 +
# clude <co
#include <st
in
di
#include <math.h>
#define epsilon 0.000000000001
float tinh(float x);

main()
{
clrscr();
float x,shx;
printf("nhap x=");
scanf("%f",&x);
printf(" ket qua theo h
printf(" ket qua theo ha
getch();
}
float tinh(float x)
{
float a,s,i;
/* Tinh theo while*/
/*
a=
while (fabs(
{
s+=a;
=a*(x*x/(i*
}

}
4. Vióỳt chổồng trỗ
xx x
n
n24 2
24 2!!

()!

+++


Thuỏỷt toaùn:
uỏỷt toaùn nhổ baỡi ồớ phỏửn III nhổng vióỳt laỷi chổồng trỗnh con
+

Th
dổồùi daỷng haỡm.



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 60
* Chổồng trỗnh

#include <conio.h>
dio.h>
h>
.000000000001

at x,chx;
("%f",&x); chx=(exp(x)+1/exp(x))/2;
theo ham=%f\n",tinh(x));
m chuan=%f\n",chx);
s,i;
*/
1; i=2; s=0;
a)>=epsilon)
{

s+=a;

}
ứm tra sọỳ nguyón n coù phaới laỡ sọỳ chờnh phổồng
#include <st
#include <math.
#define epsilon 0
float tinh(float x);
main()
{
clrscr();
flo
printf("nhap x=");
scanf
printf(" ket qua
printf(" ket qua theo ha
getch();
}
float tinh(float x)
{
float a,
/* Tinh theo while*/
/*
a=
while (fabs(


a=a*(x*x/(i*(i-1)));
i=i+2;

return s;
}

5. Vióỳt mọỹt haỡm kió
khọng ?.

* Thuỏỷt toaùn:

= 0;
begin
break;
laỡ sọỳ chờnh phổồng
khọng phaới sọỳ chờnh phổồng
+ gaùn OK
+ cho i=1; i<=(int)sqrt(n);
if (i*i == n)

OK = 1;

end;
+ Nóỳu (OK) vióỳt n
Ngổồỹc laỷi vióỳt n
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 61

* Chổồng trỗnh

clude <stdio.h>
ath.h>
emtra(int n);

rscr();
a so chinh phuong*/
n;
)
i, OK = 0;
ight by Nguyen Van Nguyen -Khoa CNTT-DHKT");
ap gia tri N : ");
("%d", &n);
i<=(int)sqrt(n); i++)
break;
}
hinh phuong", n);
printf("\nSo %d khong phai chinh phuong", n);

6. yón x,y,z coù phaới laỡ bọỹ ba sọỳ
Pi
*

#in
#include <m
#include <conio.h>
void ki

main()
{
cl
/* chuong trinh kiem tr
int
kiemtra(n);
getch();

}

void kiemtra (int n
{
clrscr();
int
printf("Copyr
printf("\nNh
scanf
for (i=1;
if (i*i == n)
{
OK = 1;


if (OK)
printf("\nSo %d la so c
else

}
Vióỳt mọỹt haỡm kióứm tra 3 sọỳ ngu
thago khọng (x
2
+y
2
=z
2
).
Thuỏỷt toaùn:

x,y,z:Real):Boolean;
Nóỳu (sqr(x) +sqr(y)=sqr(z))
(z)=sqr(y))
(z)=sqr(x)) thỗ kiemtra:=True
a:=False;
Taỷo haỡm Kiemtra(
hoỷc (sqr(x) +sqr
hoỷc(sqr(y) +sqr
ngổoỹc laỷi Kiemtr
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 62

* Chổồng trỗnh

#
include <stdio.h>
#include <math.h>
o.h>
x*x
KT(int x,int y,int z)
kiemtra;
r(x)+sqr(y)==sqr(z))||(sqr(x)+sqr(z)==sqr(y))||
)==sqr(x))) kiemtra=TRUE;else kiemtra=FALSE;
t;
ntf("Nhap 3 so a, b, c");
anf("%d%d%d",&a,&b,&c);
printf(" Day la bo ba cua Pithago");
se printf(" Day khong phai bo ba cua Pithago");
a caùc sọỳ nguyón x,y,z laỡ bọỹ ba sọỳ Pithago
Chổồng trỗnh

#include <coni
#define TRUE 1
#define FALSE 0
#define sqr(x)
int
{
int
if ((sq
(sqr(y)+sqr(z
return kiemtra;
}
main()
{
clrscr;
int a,b,c,
pri
sc
t=KT(a,b,c);
if (t==TRUE)
el
getch();
}

7. Vióỳt mọỹt haỡm in r
2 2 2
(x
+y =z ).

*

onio.h>
();
;

#include <math.h>
#include <stdio.h>
#include <c
void main()
{
clrscr();
textbackground(GREEN);
textcolor(BLUE);
clrscr
long x, y, z, dem;

dem=0
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 63
for (x=1; x<=25; x++)
= sqrt(x*x+y*y);
dem++ ;
printf("\n%6ld %6ld %6ld", x, y, z);
}
dinh ly Pitago", dem);

8. mọỹt haỡm kióứm tra õọỳi sọỳ nguyón dổồng n coù bũng tọứng
lỏỷ hổợ sọỳ cuớa noù khọng.
Vờ 153 = 1
+ 5

3
+ 3
3

*
for (y=1; y<=25; y++)
{
z
if (z*z == x*x + y*y)
{



}
printf("\n Bo so la %ld so thoa man
getch();
}

Vióỳt
p phổồng caùc c
3
duỷ :
Thuỏỷt toaùn:
+ uong
,i,t
m = n mod 10;
tam*tam;
Taỷo haỡm TongLapPh
Khai baùo caùc bióỳn tam, sum3
Gaùn

i=0; sum3=0;
laỡm
Gaùn i=i+1;
ta
sum3= sum3 + tam*
n= n div 10;
Chổỡng naỡo n>0;
Haỡm traớ vóử =sum3;

* Chổồng trỗnh


io.h>
h>
gLapPhuong(int n);
apPhuong (int n)
,tam;
i++;
n%10;
sum3=sum3+tam*tam*tam;
#include <std
#include <math.h>
#include <conio.
int Ton
int TongL
{
clrscr();
int sum3,i
i=0; sum3=0;
do {

tam=

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 64
Nguyóựn Vn Nguyón- Khoa CNTT-TVT aỷi hoỹc Baùch Khoa aỡ Nụng
k
n
kk
CCC
1
1


+=
1
0
==
n
nn
CC
a. vồùi
nn 1

,&n);
r=n;
t=TongLapPhuong(n);
/*Co tong lap phuong cac chu so :TLPCCS*/
if (t==stor) printf("%d Co TLPCCS bang chinh no");else
getch();

}
Vió tờnh tọứ hồỹp n chỏỷp k
In kóỳt quaớ cuớa cỏu a vaỡ b.
n=n/10;
} while (n>0);
return sum3;
}
main()
{
clrscr();
int n; int t,stor;
printf(" nhap so nguyen N=");
scanf("%d"
sto
printf("khong thoa man dk");

9. ỳt 2 haỡm õóứ

b.

)!!*( knk
!
n
C
k
n
=

c.
* Chổồng trỗnh

1(int n, int k)
||(k==n)) ketqua=1;
else ketqua=Th1(n-1,k-1)+Th1(n-1,k);
qua;
rintf("\nCopyright by Nguyen van Nguyen khoa CNTT ");
a tri N va K : ");
canf("%d%d", &n, &k);

#
include <conio.h>
#include <stdio.h>
int Th
{
int ketqua;
if ((k==0)

return ket
}
long TOHOP(int k, int n);
/* Chuong trinh tinh to hop cua n chap k*/
void main()
{
int n, k;
clrscr();
p
printf("\nNhap vao gi
s
Baỡi tỏỷp Tin hoỹc aỷi cổồng 65
printf("Top hop chap %d cua %d = %lu\n", k, n, TOHOP(k, n));
o hop theo cach de quy=%d",Th1(n,k));

n)
int i;
Result *= i;
return Result;

{
}
ứ tờnh tọứng S
Chổồng trỗnh
printf("T
getch();
}
long giaithua(int
{
long Result = 1;

for (i=2; i<=n; i++)


}
long TOHOP(int k, int n)
return giaithua(n) / (giaithua(k) * giaithua(n-k));


10. Haợy vióỳt 1 haỡm õóỷ quy õó
n
aa
a
S
1

11
2
+++=

*
stdio.h>
<math.h>
Tong(int n,float x)
qua;
t=1;
=1;i<=n;i++)
t=t*x;
/t+Tong(n-1,x);
qua;

#include <
#include
#include <conio.h>
float
{
float ket
float t;
int i;
if (n==0) ketqua=1;
else
{

for(i

ketqua=1
}
return ket
}
main()
{
clrscr();
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 66
float a;
int i,n;
printf("nhap a=");
scanf("%f",&a);
scanf("%d",&n);
getch();
11.
aỡm khaùc goỹi noù vaoỡ õóứ tờnh tọứng S

*
printf("nhap n=");
printf(" ket qua theo ham=%3f",Tong(n,a));
}

Haợy vióỳt 1 haỡm õóỷ quy õóứ tờnh a
i
, rọửi vióỳt mọỹt haỡm goỹi h
n
aa
a
2

S
=
1

11
+++
Thuỏỷt toaùn:

+ Coù thóứ khai baùo caùc bióỳn toaỡn cuỷc
guyón
THUA(x:kióứu thổỷc,n:kióứu nguyón)
t=x*lt(x,n-1);
);
caùc bióỳn õởa phổồng s1,t1:kióứu thổỷc,i:kióứu nguyón

Cho i=1 õóỳn n laỡm
/lt(x,i);
ỗnh chờnh
a);
ổồng trỗnh
a:kióứu thổỷc
n:kióứu n
+ Taỷo haỡm tờnh a muợ lUY
Nóỳu (n==0) thỗ lt=1
Ngổồỹc laỷi l
+ Taỷo haỡm TINH(n:byte;x:real
Khai baùo
Gaùn s1=1;
Gaùn s1:=s1+1
Vióỳt s1

+ Trong chổồng tr
oỹc n,a
Goỹi haỡm TINH(n,

* Ch

.h>
ude <conio.h>

0) Lt=1; else Lt=x*LUYTHUA(x,n-1);
t TINH(int n, float x)

#include <stdio.h>
#include <math
#incl
float LUYTHUA(float x,int n)
{
float Lt;
if (n==
return Lt;
}
floa
{
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 67
float s1=1,t1;
1;i<=n; i++) s1=s1+1/LUYTHUA(x,i);
et qua la=%f",s1);
ntf("nhap a=");
anf("%f",&a);

getch();
}

12. a. Vióỳt 1 haỡm õóỷ
thuớ tuỷc lỷp tờnh
int i;
for(i=
printf(" k
}
main()
{
float a;
int n;
clrscr();
pri
sc
printf("nhap n=");
scanf("%d",&n);
TINH(n,a);
quy õóứ tờnh S
n
i
b. Haợy vióỳt 1
rọửi goỹi lọửng vaỡo 1 haỡm õóứ
ỳt quaớ bũng haỡm chuỏứn õóứ so saùnh).
:
tờnh tọứng S (In kó

ùn* Thuỏỷt toa

Gồỹi yù: Thuỏỷt toaùn tờnh cn bỷc n cuớa x bũng phổồng phaùp xỏỳp xố (khọng duỡng haỡm chuỏứn EXP)
Thuỏỷt toaùn tờnh y=
x

n
* Nóỳu x=0 thỗ y=

0 nóỳu khọng
ỷt y0=x
ỷp laỷi
y=y0
y0=1/n*((n-1)*y + x/y
n-1
)
aợy goỹi haỡm tờnh
x
n

õóứ tờnh y
n-1
}
+
+
+ L


{ h


n

n
n
S ++++=
3
3
2
2
1
3
Cho õóỳn khi a bs( y-y0)< epsilon
y:= (y+y0)/2



Chổồng trỗnh



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 68
#include <stdio.h>
<math.h>
e epsilon 0.00001
Mu(float x,float n)
i;
=1;
e
;
f(n>0) ketqua=s; else ketqua=1/s;
*/

Can(float x,float n)
,can;
0=x;
y=y0;
X_Mu(y,n-1));
} while (fabs(y-y0)>epsilon);
)/2;
at tong(float n)
t t=1;
t=t+i/TinhCan(i,i);
t;
y;float kq;
=1;
e
y=exp(1/n*log(n));
#include
#include <conio.h>
#defin
float X_
{
float s,ketqua;
int
if (n==0) ketqua
els
{ s=1;
for(i=1; i<=abs(n); i++) s=s*x
i
}
return ketqua;
}

/*
float Tinh
{
float y0,y
if (x==0) can=0;
else
{
y
do {

y0=1/n*((n-1)*y+x/

can=(y+y0
}
return can;
}
flo
{
floa
int i;
for(i=2;i<=n; i++)
return
}
float tongdq(float n)
{
float
if (n==1) kq
els
{

Nguyãùn Vàn Nguyãn- Khoa CNTT-ÂTVT Âaûi hoüc Baïch Khoa Âaì Nàông