thuat toan ve kieu tep

thuat toan ve kieu tep

thuat toan ve kieu tep

... := 18; biến Toan := 10.0; biến Van := 8.0; biến TBMon := (Toan+ Van)/2; Sau đó để ghi các giá trị trên vào File dùng các lệnh : Assign(F,TD1.TXT); Rewrite(F); Writeln(F,Hoten,Tuoi, ,Toan, ,Van, ... #84,#82,#85,#69 , đó là các kí tự T,R,U,E . 2) Cách khai báo : Cách 1 Type TenkieuFile = Text; Var TenbienFile : TenkieuFile; Cách 2 Var TenbienFile : Text; Thí dụ Var F1,F2 : Text; 3) Thông báo...
Ngày tải lên : 29/09/2013, 12:10
  • 51
  • 403
  • 2
Mô phỏng trực quan thuật toán về cấu trúc điều khiển và kiểu dữ liệu có cấu trúc chương 3, 4 tin học 11

Mô phỏng trực quan thuật toán về cấu trúc điều khiển và kiểu dữ liệu có cấu trúc chương 3, 4 tin học 11

... Hạnh (2008), Khoá luận tốt nghiệp Thiết kế bài giảng điện tử Tin học 11 bằng công cụ Flash. 12. Lovecode, Tìm hiểu về Flash, Flash là gì? (Tài liệu Dowload) 13. Nguyễn Mạnh Hùng, Làm quen với ngôn ... đợc viết và phân phối bởi Adobe Systems (công ty đã mua Macromedia). Flash dùng kỹ thuật đồ họa vectơ và đồ họa điểm (raster graphics). Ngoài ra Flash còn có một ngôn ngữ văn lệnh riêng gọi là ....
Giới thiệu thuật toán vẽ và tô các đường cơ bản

Giới thiệu thuật toán vẽ và tô các đường cơ bản

... DDA Begin dx=x2-x1 dy=y2-y1 abs(dx)>abs(dy) step=abs(dx) step=abs(dy) x_inc=dx/step y_inc=dy/step x=x1;y= y1 putpixel(x1,y1,c) k<=step x = x+x_inc y = y+y_inc putpixel(round(x),round(y),c) ... dx, dy, step : integer; X_inc, y_inc , x, y : real ; Begin dx:=x2-x1; dy:=y2-y1; if abs(dx)>abs(dy) then steps:=abs(dx) else steps:=abs(dy); x_inc:=dx/steps; ... steps:=abs(dy); x_inc:=dx/step...
Ngày tải lên : 27/08/2012, 09:37
  • 159
  • 5.2K
  • 44
Các thuật toán vẽ đường

Các thuật toán vẽ đường

... MÁY TÍNHDương Anh Đức, Lê Đình Duy Các thuật toán vẽ đường 1/22CCaáùcc tthhuuaậätt ttooaáùnn vveẽõ đđưươờønnggDDaẫãnn nnhhaậäpp• Giả sử tọa độ các điểm nguyên sau khi xấp xỉ đốitượng thực ... độ.12387654 ĐỒ HỌA MÁY TÍNHDương Anh Đức, Lê Đình Duy Các thuật toán vẽ đường 2/22TThhuuaậätt ttooaáùnn vveẽõ đđưươờønngg tthhaẳúnngg• Xét đoạn thẳng có hệ số góc 10 << mvà 0>Dx.• Với các ... tr...
Ngày tải lên : 27/08/2012, 09:54
  • 22
  • 3.9K
  • 13
Thuật toán vẽ đường tròn trong lập trình

Thuật toán vẽ đường tròn trong lập trình

... Point wmin, Point wmax){ int thoat ,ve; double m;thoat=0; ve= 1;11 while(thoat==0){ if((ma(A) | ma(B)==0) thoat=1;else if((ma(A)&ma(B))!=0){thoat=1; ve= 0}else { if(m(A)==0) hoanvi(&A,&B);if(A.x==B.x){ ... A.x+(wmin.y-A.y)/m;A.y=wmin.y; }elseif(A.y>wmax.y){ A.x=A.x+(wmax.y-A.y)/m; 12 A.y=wmax.y; }}}}//end whileif (ve) veduongthang(A,B);}2.Thuật toán chia nhị phânChia mặt phẳ...
Ngày tải lên : 27/08/2012, 11:20
  • 28
  • 3.5K
  • 12
Artical - Neuron Network - Một thuật toán về huấn luyện mạng Neuron Network

Artical - Neuron Network - Một thuật toán về huấn luyện mạng Neuron Network

... [12], liên quan mật thiết với lĩnh vực kỹ thuật robot. Trong thí nghiệm, vector đặc trưng của ảnh và bốn vector vclj như sau: v={1,2,1,0,1}; vcl1={1,1,2,1,0}; vcl2={0,1,1,2,1}; ... Algorithm for Fast Convergence in Training Neural Networks. 2001. IEEE. &&5. Deniz Erdogmus, Jose C.Principe. Generalized Information Potential Criterion for Adaptive System Training. 2002. ... Panajotis Ag...
Ngày tải lên : 04/10/2012, 11:52
  • 8
  • 1.1K
  • 18
GA BD HSG: Chuyên đề thuật toán về số

GA BD HSG: Chuyên đề thuật toán về số

... cỏc thụng tin khỏc: procedure nhap; var t : string; begin ClrScr; writeln('NHAP THONG TIN VE CAC CUON SACH'); writeln('(nhap ten sach la xau rong neu muon dung)'); repeat
Ngày tải lên : 23/07/2013, 01:27
  • 23
  • 755
  • 3
thuat toan ve string

thuat toan ve string

... End; Procedure Hien; Begin Writeln('Xau S sau khi chuyen ',i,' phan tu dau trai ve dau phai '); Writeln(S); End; BEGIN Clrscr; Nhap; Chuyen; Hien; Readln; END. Bµi 7 : _________________
Ngày tải lên : 29/09/2013, 12:10
  • 38
  • 469
  • 0
thuat toan ve mang 1 chieu

thuat toan ve mang 1 chieu

Ngày tải lên : 29/09/2013, 12:10
  • 39
  • 1K
  • 16