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 tr pri \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; (10 if ((( &&(b!=i)&&(b!=y)&&(b!=t)&&(b!=e) &&(i!=e)&&(t!=e)) printf("% getch(); } Kóỳt quaớ chaỷy chổ Bit Byte 196 x 8 = 1568 197 x 8 = 1576 198 x 8 = 1584 296 x 8 = 2368 297 x 8 = 2376 2384 29 396 x 8 = 3168 97 x 8 = 3176 3 398 x 8 = 3184 8. Tờnh n!! =1.3.5 N nó = 2.4.6. * Thuỏỷt toaùn: + Khai baùo haỡm giaithổỡa, start + Nhỏỷp giaù trở 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 36 + Nóỳu (n mod 2 = 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> void main() { clrscr(); int n, unsigned long printf("\nNhap gia tri N : "); scanf("%d", &n) if (n%2 == 0) start = e for (i=start; i<=n; i = i+ gthua *= i; printf("\n%d getch(); } 9. Tờnh laợi suỏỳt tióỳt kióỷm Baỷn coù mọỹt khoaớn tióửn P õóứ gổới vaỡo quyợ tióỳt kióỷm, mọựi thaùng laợi I phỏửn trm. Sọỳ tióửn sau n thaùng gổới seợ laỡ F F/ ho lóỷ laợi vaỡ theo sọỳ thaùng. Haợy lỏỷp baớng sau: 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 Khai 2 bióỳn i,n Vióỳt ('n', ' ':8); Cho i=5 õóỳn 10 laỡm Vióỳt (I,'% Cho n=1 õóỳn 10 laỡm Vióỳt (n, ' :3); Cho i=5 õóỳn 10 laỡm Vióỳt ( Exp(n*Ln(1+ i/ 10 Vióỳt xuọỳng doỡng. Chổồng tr* io.h> nio.h> Nguyen Van Nguyen -Khoa CNTT-DHKT\n"); ++) \n",n); toxy(4,n+2); d # include <st #include <co #include <math.h> void main() { clrscr(); oat i; fl int j,n; t by printf("Copyrigh 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, ' '); ỗnh Khai baùo 3 bióỳn Cho i=1 õóỳn 1000 laỡm gin Gaùn Tong=0; cho J=1 õóỳn i-1 laỡm Nóỳu (i mod j) Nó Vióỳt(' Cac uoc s Cho j:=1 õóỳn i-1 Nóỳu i mod j =0 T Vióỳt xuọỳng doỡng End * Chổồng tr de<conio.h> f ( f ( { printf("So tuyet hao la=%d\n",i); printf("Cac uoc so la"); for(j=1; j<i-1;j++) if (i%j==0) printf(" %d ",j); printf("\n"); #include<stdio.h> #include<math.h> #inclu void main() { clrscr(); int i, j,tong; 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 * Chổồng trỗnh khai baùo 3 bióỳn i, + Nhỏỷp giaù trở cuớa M tổỡ baỡn phờm. + + i=0; i=i+1; gt=gt*i; ch Vióỳt So n nho tdio.h> <conio.h> r(); t; ; thuc M="); { hua bang %d la %d",i,gt); g trỗnh nhỏỷp daợy sọỳ gọửm n sọỳ nguyón. Tờnh trung bỗnh nhỏn. * #include <s #include void main() { clrsc long g 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 ; Ptb=Ptb*A[i]; + g cuớa daợy sọỳ Sumtb Vióỳt trung bỗnh nhỏn Ptb * Chổồng trỗnh Sumtb=sumtb+A[i] Sumtb=Sumtb/n; Ptb=sqrt(Ptb); Vióỳt trung bỗnh cọỹn n cua day n :"); */ ); at mang 1 chieu*/ */ o :\n"); i=1; i<=n; i++) ]); ; mtb+a[i]; ptb=ptb*a[i]; } printf("Trung binh nhan cua day so ptb=%f",ptb); nh nhỏỷp tổỡ baỡn phờm sọỳ nguyón dổồng n. Tờnh tọứng `vaỡ tờch caùc chổợ sọỳ cuớa noù. #include <stdio.h> #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(); } 14. Vióỳt chổồng trỗ 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 41 ( Vờ duỷ: n=452 thỗ tọứng caùc chổợ sọỳ S=11 vaỡ tờch caùc chổợ sọỳ P ỷt toaùn: =40) * Thuỏ + hai baùo hũng max=1000 + ỳn : n,i,j,t,S,P + A phờm + 0; ch + Gaùn S=0; P=1; ỡm ổợ sọỳ Vióỳt tờch caùc chổợ sọỳ. Chổồng trỗnh Coù thóứ k Khai baùo caùc bió khai baùo maớng + oỹc n tổỡ baỡn + gaùn i=0; t=n; Laỡm i=i+1; A[i]=n mod 1 n=n div 10; ổỡng naỡo n>0 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++ a[i] =n%10; n=n/10; } whil s=0;p=1; for(j=1;j<=i;j++) { } 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 42 printf(" Tich cac chu so cua so %d la %d",t,p); 15 h lióỷt kó tỏỳt caớ caùc sọỳ k bũng tọứng lỏỷp getch(); } . Vióỳt chổồng trỗn phổồng caùc chổợ sọỳ cuớa noù (k < 1000) * Thuỏỷt toaùn: Khai baùo 3 bióỳn:i,j,k ỡm ỡm +k*k*k =100*i +10*j +k Thỗ Chổồng trỗnh + + Cho i=1 õóỳn 9 la Cho j=0 õóỳn 9 la Cho k=0 õóỳn 9 laỡm Nóỳu i*i*i +j*j*j + 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< { printf("\n %d%d%d",i,j,k); getch(); } 16. Vióỳt chổồng trỗnh lió n, vồùi n laỡ sọỳ longin * Thuỏỷt toaùn: Begin i if i mod j = 0 + Cho i=2 õóỳn i<n Cho j=2 õóỳn j< 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 43 thoaùt if j = i vióỳt i ra maỡn hỗnh End Chổồng trỗnh * io.h> h> 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); } getch(); } 17. Vió sọỳ cuớa n. * Thuỏỷt toaùn: óỳn s,n ọỳ n tổỡ baỡn phờm Gaùn s=0; s= s+n mod cho 10 vióỳt s ra Chổồng trỗnh + Khai baùo caùc bi + Nhỏỷp giaù trở s + + laỡm n=n div 10 chổỡng naỡo n>0; + * io.h> o.h> #include <std #include <coni 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 44 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 n x n n )1(++ xx n X KK 2 )1( 1 + S= k 1 K 21 = = Vồùi sọỳ ng * Thuỏỷt toaùn: + Khai baùo caùc bióỳn s,x,t,n,k + oỹc giaù trở x tổỡ baỡn phờm 1 thỗ o k=2 õóỳn n laỡm 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 [...]... a,b,n,buoclap; a=1;b=1;buoclap=0; n =3; while (fabs(b)>epsilon) { b=-b*(n-2)/n; a=a+b; n=n+2; buoclap++; } printf(" So pi la=%5f\n",a*4); printf(" So pi ham chuan=%5f\n",M_PI); printf(" So vong lap la=%f",buoclap); 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 49 24 Vióỳt chổồng trỗnh tờnh S= Sin(x) = x - x 3 3! + x 5 5! n x 2 n 1 - + (-1) (2n... s1,s2,x,a1,a2,i,k; printf(" Nhap x="); scanf("%f",&x); x=x*M_PI/180; s1=0; a1=x;i =3; /* Tinh theo while*/ /* -*/ while (fabs(a1)>=epsilon) { s1+=a1; a1=a1*(-(x*x/(i*(i-1)))); i=i+2; } /* -*/ /* Tinh theo do while*/ s2=0; a2=x;k =3; do { 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);... x - x 3 3! + x 5 5! n x 2 n 1 - + (-1) (2n 1) ! + * Chổồng trỗnh #include #include #include #define epsilon 0.00000001 void main() { clrscr(); int d; float i,j,k,y,s,a,x,a1,s1; printf(" BANG TRA CUU HAM LUONG GIAC\n"); printf(" DO WHILE DO_WHILE CHUAN \n"); /* */ for(j=1;j=eps laỡm s=s+a; a=a*(-(x*x/(i*(i-1)))); i=i+2; + Vióỳt kóỳt quaớ s + Vióỳt kóỳt quaớ theo haỡm chuỏứn õóứ so saùnh * Chổồng trỗnh #include #include #include #define epsilon 0.000001 void main() { clrscr(); /* Chuong trinh tinh sin(x) theo chuoi Taylor*/ float s1,s2,x,a1,a2,i,k; printf(" Nhap x="); scanf("%f",&x); x=x*M_PI/180; s1=0; a1=x;i =3; ... printf("Cho gia tri 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 48 scanf("%d", &n); printf("Cac uoc so cua %d la :\n", n); for (i=1; i=epsilon) { s+=a; a=a*(-(x*x/(i*(i-1)))); i=i+2; } /* -*/ /* Tinh theo do while*/ s1=0; a1=x;k =3; 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 51 do { s1+=a1; a1=a1*(-(x*x/(k*(k-1)))); k=k+2; }while (fabs(a1)>=epsilon); printf("\n%2d %5f % 5f %5f",d, s, s1, sin(x)); } getch();... * Chổồng trỗnh #include #include #include #define epsilon 0.00000001 void main() { clrscr(); /* Chuong trinh tinh cos(x) theo chuoi Taylor*/ float s1,s2,x,a1,a2,i,k; printf(" Nhap x="); scanf("%f",&x); x=x*M_PI/180; s1=0; a1=1;i=2; /* Tinh theo while*/ /* -*/ 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; int n,k; printf("Nhap so n ="); scanf("%d",&n); printf("Nhap so thuc x ="); scanf("%f",&x); if (n>1) { s=1; for (k=2;k . 1.94872 1.71819 1.850 93 1.99256 2.1 435 9 .68948 1. 838 46 1.99900 2.17189 2 .35 795 2 .36 736 2.5 937 4 * ùn: 6 1 .34 010 1.4 7 1.40710 1.5 036 3 8 1.47746 1.5 938 5 9 1.55 133 1 10 1.62889 1.79085 1.96715. 1.25971 1.295 03 1 .33 100 4 1.21551 1.26248 1 .31 080 1 .36 049 1.41158 1.46410 5 1.27628 1 .33 8 23 1.40255 1.46 933 1. 538 62 1.61051 1852 1.500 73 1.58687 1.67710 1.77156 1.60578 1.7 138 2 1.82804 1.94872. 1568 197 x 8 = 1576 198 x 8 = 1584 296 x 8 = 236 8 297 x 8 = 237 6 238 4 29 39 6 x 8 = 31 68 97 x 8 = 31 76 3 398 x 8 = 31 84 8. Tờnh n!! =1 .3. 5 N nó = 2.4.6. * Thuỏỷt toaùn: + Khai baùo