- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
c c 算法实例(Example of C c algorithm).doc
c c++算法实例(Example of C c++ algorithm)
C C++, algorithm example
First, number theoretic algorithm
The greatest common divisor of 1.
Function GCD (a, b:integer): integer;
Begin
If b=0 then gcd:=a
Else gcd:=gcd (B, a mod B);
End;
The least common multiple of the 2.
Function LCM (a, b:integer): integer;
Begin
If ab then swap (a, B);
Lcm:=a;
While LCM mod b0 do Inc (LCM, a);
End;
The solution of 3. prime numbers
A. determine if a number is prime in a small range:
Function prime (n: integer): Boolean;
Var I: integer;
Begin
For I:=2 to TRUNC (sqrt (n)) do
If n mod I=0 then begin
Prime:=false; exit;
End;
Prime:=true;
End;
B. determines whether the number within the range of Longint is a prime number (including a prime table less than 50000):
Procedure getprime;
Var
I, j:longint;
P:array[1..50000] of boolean;
Begin
Fillchar (P, sizeof (P), true);
P[1]: =false;
I:=2;
While i50000 do begin
If p[i] then begin
J:=i*2;
While j50000 do begin
P[j]: =false;
Inc (J, I);
End;
End;
Inc (I);
End;
L:=0;
For i:=1 to 50000 do
If p[i] then begin
Inc (L); pr[l]: =i;
End;
End; {getprime}
Function prime (x:longint): integer;
Var i:integer;
Begin
Prime:=false;
For i:=1 to l do
If pr[i]=x then break
Else if x mod pr[i]=0 then exit;
Prime:=true;
End; {prime}
Two, graph theory algorithm
1. minimum spanning tree
A.Prim algorithm:
Procedure prim (v0:integer);
Var
Lowcost, closest:array[1..Maxn] of integer;
I, J, K, min:integer;
Begin
For i:=1 to n do begin
Lowcost[i]: =cost[v0, i];
Closest[i]: =v0;
End;
For i:=1 to n-1 do begin
{look for the nearest vertex k} not spanning the spanning tree
Min:=maxlongint;
For j:=1 to n do
If (lowcost[j]min) and (lowcost[j]0) then begin
Min:=lowcost[j];
K:=j;
End;
Lowcost[k]: =0; {vertex K is added to the spanning tree}
Add a new edge K to closest[k]} in the {spanning tree
{modify the lowcost and closest values of each point}
For j:=1 to n do
If cost[k, j]lwocost[j] then begin
Lowcost[j]: =cost[k, j];
Closest[j]: =k;
End;
End;
End; {prim}
B.Kruskal algorithm: (Tan X
您可能关注的文档
- 行政领导学(黄本).doc
- 高士其科普童读书笔记.doc
- 高频课程设计(超外差调幅收音机、无线调频话筒).doc
- 毕业设计(论文)-T四柱式液压机结构及控制系统设计(全套图纸).doc
- 铝与碱溶液反应(共篇).doc
- 凤凰新学案·高中物理必修(教师用书)全国教育版e.docx
- 课堂新坐标通用版2017届高考生物二轮复习专题限时集训3第1部分板块1专题3酶和ATP剖析.doc
- 食醋样品的荧光光谱技术鉴定.doc
- 财务管理国际资产经营方向专业辅修专业学士学位教学.doc
- 昌赣标长城监理过程控制标准化第四篇.doc
- 浙江省温州市浙南名校联盟2025-2026学年高一上学期期中联考数学试题含解析.docx
- 26高考数学提分秘诀重难点34圆锥曲线中的定点、定值、定直线问题(举一反三专项训练)(全国通用)(含解析).docx
- 26高考数学提分秘诀重难点35概率与统计的综合问题(举一反三专项训练)(全国通用)(含解析).docx
- 26高考数学提分秘诀重难点31圆锥曲线中的切线与切点弦问题(举一反三专项训练)(全国通用)(含解析).docx
- 26高考数学提分秘诀重难点30圆锥曲线中的弦长问题与长度和、差、商、积问题(举一反三专项训练)(全国通用)(含解析).docx
- 26高考数学提分秘诀重难点29巧解圆锥曲线的离心率问题(举一反三专项训练)(全国通用)(含解析).docx
- 26高考数学提分秘诀重难点28直线与圆的综合(举一反三专项训练)(全国通用)(含解析).docx
- 寡核苷酸药物重复给药毒性研究技术指南.docx
- 重组溶瘤腺病毒生产质量管理标准.docx
- 26高考数学提分秘诀重难点27直线与圆中常考的最值与范围问题(举一反三专项训练)(全国通用)(含解析).docx
原创力文档


文档评论(0)