data segment freq dw 262,294,330,349,392l,440,494 data ends code segment assume ds:data, cs:code main proc far start: push ds mov ax,0 push ax mov ax,data mov ds,ax mov al,10110110b ;8253定时器2初始化 out 43h, al in al,61h ;读pb口 or al,03h out 61h,al ;pb0,
这是我的作业。。。。希望对各位有#include #include #include #define SIZE (xsize*ysize+1) //一系列全局变量便于传递参数 int *location,*way, xsize,ysize,firstx,firsty, noworder; int getnum (void);//取数函数,取数成功返回1,否则返回-1 int init (void); //初始化函数,申请数组空间,以及初始化数组, //申请成功返回1,否则返回-1 int
/* * This Code Was Created By Jeff Molofee 2000 * A HUGE Thanks To Fredric Echols For Cleaning Up * And Optimizing The Base Code, Making It More Flexible! * If You've Found This Code Useful, Please Let Me Know. * Visit My Site At nehe.gamedev.net */
c算法大全常用c语言算法_包括数论算法_图论算法、排序算法、高精度计算、树的遍历算法等等.doc 一、数论算法 1.求两数的最大公约数 function gcd(a,b:integer):integer; begin if b=0 then gcd:=a else gcd:=gcd (b,a mod b); end ; 2.求两数的最小公倍数 function lcm(a,b:integer):integer; begin if a0 do inc(lcm,a); end; 3.素数的求法 A
'计算图幅号 Option Explicit Type ArrayData Data() As String Count As Integer End Type Public Function getSheetNumber(strLat As String, strLon As String, ScaleID As String) As String Dim strLatErr As String, strLonErr As String Dim dblLatErr As String, db