Bạn có muốn phản ứng với tin nhắn này? Vui lòng đăng ký diễn đàn trong một vài cú nhấp chuột hoặc đăng nhập để tiếp tục.



 
Trang ChínhTrang Chính  Tìm kiếmTìm kiếm  Latest imagesLatest images  Đăng kýĐăng ký  Đăng NhậpĐăng Nhập  

Share | 
 

 Tam giác Pascal

Xem chủ đề cũ hơn Xem chủ đề mới hơn Go down 
Tác giảThông điệp
LeeSub
Cá chép
Cá chép
LeeSub


Tổng số bài gửi : 24
Cảm ơn : 37
Danh vọng : 4
Join date : 11/01/2011

Tam giác Pascal Empty
Bài gửiTiêu đề: Tam giác Pascal   Tam giác Pascal EmptyFri Jan 14, 2011 9:28 pm

Tam giác Pascal Titleb10 Fri Jan 14, 2011 9:28 pm » Tam giác Pascal Tam giác Pascal Titleb13
Đề bài: Hãy viết ct in ra tam giác Pascal khi nhập giá trị n là chiều cao của tam giác.

Code:
#include<stdio.h>
#include<conio.h>
int chap_k(int n,int k)
{
   unsigned long ts=1,ms=1;
   if(k>n-k) k=n-k;
   for(int i=1;i<=k;i++)
   {   ts*=((n-k)+i);
      ms*=i;
   }
   return ts/ms;
}
void tam_giac_pascal(int h)
{   for(int i=0;i<h;i++)
   {   for(int j=0;j<=i;j++)
         printf("%6d",chap_k(i,j));
         printf("\n");
   }
}
void main()
{    int h;
   
   printf("\n\*Nhap do cao cua tam giac pascal: ");
   scanf("%d",&h);
   tam_giac_pascal(h);
   getch();
}


LeeSub

Tam giác Pascal Border10 Tam giác Pascal Border14
Về Đầu Trang Go down
LeeSub
Cá chép
Cá chép
LeeSub


Tổng số bài gửi : 24
Cảm ơn : 37
Danh vọng : 4
Join date : 11/01/2011

Tam giác Pascal Empty
Bài gửiTiêu đề: Re: Tam giác Pascal   Tam giác Pascal EmptyFri Jan 14, 2011 9:29 pm

Tam giác Pascal Titleb10 Fri Jan 14, 2011 9:29 pm » Re: Tam giác Pascal Tam giác Pascal Titleb13
Chú ý chú ý: Sưu tầm trên mạng, chưa hiểu cách làm... Có sửa Code một tí để phú hợp chạy với VB 6.0 (bài gốc có cả mã màu cho kí tự!!)


LeeSub

Tam giác Pascal Border10 Tam giác Pascal Border14
Về Đầu Trang Go down
Tboy
Cá voi
Cá voi
Tboy


Nam Tổng số bài gửi : 178
Cảm ơn : 413
Danh vọng : 4
Join date : 03/01/2011
Age : 32
Đến từ : TPHCM

Tam giác Pascal Empty
Bài gửiTiêu đề: Re: Tam giác Pascal   Tam giác Pascal EmptyFri Jan 14, 2011 9:37 pm

Tam giác Pascal Titleb10 Fri Jan 14, 2011 9:37 pm » Re: Tam giác Pascal Tam giác Pascal Titleb13
daudon Tưởng An tự làm
Bài này Thái mần rùi mà ko sao làm được hình tam giác cân hết tetua
Bài này nó giống giống in tam giác vuông thui mà thay dấu * bằng số, số này là kết quả tính từ tổ hợp,bài này làm khi in ra chừa khoảng trống tối thiểu cho 1 số là 6


Tboy

Tam giác Pascal Border10 Tam giác Pascal Border14
Về Đầu Trang Go down
https://taplaptrinh.forumvi.com
theday38
Vịt cồ
Vịt cồ
theday38


Tổng số bài gửi : 8
Cảm ơn : 10
Danh vọng : 0
Join date : 06/01/2011

Tam giác Pascal Empty
Bài gửiTiêu đề: Re: Tam giác Pascal   Tam giác Pascal EmptyMon Jan 17, 2011 9:52 pm

Tam giác Pascal Titleb10 Mon Jan 17, 2011 9:52 pm » Re: Tam giác Pascal Tam giác Pascal Titleb13
Code:
#include <stdio.h>
#include <string.h>
#define NEN ' '

double GiaiThua(int N);
double ToHop(int N,int K);
void TamGiacPascal1(int H);
void TamGiacPascal2(int H);

void main()
{
   int n=10,h;
   do
   {
      printf("Nhap h: ");
      scanf("%d",&h);
   } while (h<=0 || h>=15);
   TamGiacPascal2(h);
   TamGiacPascal1(h);
}
//Giai thua
double GiaiThua(int N)
{
   double gt=1;
   for(int i=2;i<=N;i++)
      gt*=i;
   return gt;
}
//To hop
double ToHop(int N,int K)
{
   return GiaiThua(N)/(GiaiThua(K)*GiaiThua(N-K));
}
//Tam giac vuong
void TamGiacPascal1(int H)
{
   for (int j=0;j<=H;j++)
   {
      for (int i=0;i<=j;i++)
         printf("%4.0lf",ToHop(j,i));
      printf("\n");
   }
}
//Tam giac can
void TamGiacPascal2(int H)
{
   int f;
   f=H+1;
   for (int j=0;j<=H;j++)
   {
      f--;
      for (int p=f;p>=1;p--)
         printf("%c ",NEN);
      for (int i=0;i<=j;i++)
         printf("%4.0lf",ToHop(j,i));
      printf("\n");
   }
}


theday38

Tam giác Pascal Border10 Tam giác Pascal Border14
Về Đầu Trang Go down
Lynrch
Cá mập
Cá mập
Lynrch


Nam Tổng số bài gửi : 59
Cảm ơn : 116
Danh vọng : 0
Join date : 05/01/2011
Age : 31
Đến từ : HCM

Tam giác Pascal Empty
Bài gửiTiêu đề: Re: Tam giác Pascal   Tam giác Pascal EmptyMon Jan 17, 2011 10:16 pm

Tam giác Pascal Titleb10 Mon Jan 17, 2011 10:16 pm » Re: Tam giác Pascal Tam giác Pascal Titleb13
Cuối cùng thì mới thấy anh ấy post bài anh Quốc 1 nhân tài giấu mặt Tam giác Pascal 9fJGeTam giác Pascal 9fJGeTam giác Pascal 9fJGe


Lynrch

Tam giác Pascal Border10 Tam giác Pascal Border14
Về Đầu Trang Go down
Sponsored content




Tam giác Pascal Empty
Bài gửiTiêu đề: Re: Tam giác Pascal   Tam giác Pascal Empty

Tam giác Pascal Titleb10 » Re: Tam giác Pascal Tam giác Pascal Titleb13


Sponsored content

Tam giác Pascal Border10 Tam giác Pascal Border14
Về Đầu Trang Go down
 

Tam giác Pascal

Xem chủ đề cũ hơn Xem chủ đề mới hơn Về Đầu Trang 

 Similar topics

-
» In tam giác cân nằm
» In tam giác-(Câu lệnh lặp FOR-WHILE)
» In tam giác ngược
» In hình 2 tam giác cân đối xứng qua đỉnh
» BT nhap tam giac & BT nhập thông tin thí sinh (kiểu struct)
Trang 1 trong tổng số 1 trang

Permissions in this forum:Bạn không có quyền trả lời bài viết
 :: Cơ sở lập trình 1 :: Bài tập khác-