Pascal 用递归求最大公约数

原创已于 2024-04-03 00:49:50 修改 · 165 阅读

0 ·

CC 4.0 BY-SA版权

文章标签：

#学习

于 2024-04-03 00:48:55 首次发布

Delphi基础专栏收录该内容

20 篇文章

订阅专栏

该程序展示了如何用IT技术中的递归方法实现欧几里得算法，计算给定整数a和b的最大公约数。通过`gcd`函数，当n不为0时，递归调用自身处理m除以n的余数，直到n为0，返回结果。

var
  a, b: Integer;

function gcd(m, n: Integer): Integer;
begin
  if (n = 0) then
    result := m
  else
    result := gcd(n, m mod n);
end;

begin
  readln(a, b);
  Writeln(gcd(a, b));
  readln;

end.

确定要放弃本次机会？

福利倒计时

: :

立减 ¥

普通VIP年卡可用

立即使用

weiabc

关注关注

1
点赞
踩
0

收藏

觉得还不错? 一键收藏
0
评论
分享

复制链接

分享到 QQ

分享到新浪微博

扫一扫
举报

举报

专栏目录

递归实现求最大公约数

小白兔奶糖の博客

08-19

1万+

辗转相除法辗转相除法，又名欧几里德算法(Euclidean algorithm)，是求两个正整数之最大公约数的算法。它是已知最古老的算法，其可追溯至公元前300年前。它的具体做法是：用较大数除以较小数，再用出现的余数（第一余数）去除除数，再用出现的余数（第二余数）去除第一余数，如此反复，直到最后余数是0为止。如果是求两个数的最大公约数，那么最后的除数就是这两个数的最大公约数。另一种求两数的最大公约数的方法是更相减损法。来源：设两数为a、b(a>b)，求a和b最大公约数(a，b)的步

两个正整数的最大公约数（Greatest Common Divisor,GCD）是能够整除这两个整数的最大整数。请实现程序，用递归方法计算两个数的最大公约数。

Tomatos_baby的博客

03-31

1610

int Gcd(int a, int b); int main() { int a, b, c; scanf("%d %d", &a, &b); c = Gcd(a, b); if (c != -1) { printf("%d\n", c); } else { printf("Input number should be positive!\n"); } return 0; }int Gcd(int a, int b) { if (a <= 0 || b.

参与评论您还未登录，请先登录后发表或查看评论

pascal递归

博济的博客

05-20

950

递归算法可谓是pascal语言和算法的三大风水宝地之一：循环；字符串；递归；没有递归的基础别想学深搜，宽搜；所以今天我们来讨论一下递归；递归的大概思路是介样的（a[1]）<---(a[2])<---(a[3])..............<---(a[n]) ---> ---> ..............--...

递归求最大公约数GCD

dxs986的博客

07-14

542

递归求最大公约数GCD int gcd(int a , int b){ return a%b==0? b:gcd(b,a%b); }

递归实现最大公约数

tangwith的博客

01-07

477

【代码】递归实现最大公约数。

C、C++算法集合

Mr_Li1995的专栏

07-28

1051

作者： Linda_Liu 链接：http://www.imooc.com/article/details/id/11159 来源：慕课网一、数论算法 1．求两数的最大公约数function gcd(a,b:integer):integer; begin if b=0 then gcd:=a else gcd:=gcd (b,a mod b); end ; 2．求两数的最小公倍数func

递归算法解析：实现阶乘与最大公约数

"递归例题分析文档详细解析了如何使用递归算法来解决两个典型问题：计算阶乘和寻找最大公约数。" 在计算机科学中，递归是一种强大的编程技术，它允许函数或过程调用自身来解决问题。递归通常用于解决那些可以分解为...

数论基础算法详解：最大公约数、最小公倍数与素数判定

资源摘要信息:"有关数论的一些比较基本的算法"一文系统地介绍了初等数论中若干核心算法及其编程实现，内容涵盖最大公约数（GCD）、最小公倍数（LCM）、扩展欧几里德算法以及素数判定与生成等基础但极为重要的数学...

Pascal编程解决NOIP 2001普及组题目：计数、公因数与公倍数及前序遍历

在本资源中，我们发现了三道针对NOIP（全国青少年信息学奥林匹克联赛）的编程题目，分别涉及三个不同的知识点：数的计数、最小公倍数和最大公约数问题以及求前序排列。这些问题都是用Pascal语言编写的，旨在帮助参赛...

【数据结构】算法精华：最大公约数、最小公倍数与素数判断

首先，我们来看求两数最大公约数(greatest common divisor, GCD)的算法。这里采用的是欧几里得算法，也称为辗转相除法。基本思路是：两个正整数a和b，若b为0，则a是两数的最大公约数；若b不为0，则继续用a除以b的...

Pascal语言实现常用基本算法与数论应用

资源摘要信息:"常用基本算法（pascal）是一份系统介绍使用Pascal语言实现基础数论相关算法的技术资料，内容涵盖了最大公约数、最小公倍数、素数判断以及经典算法如欧几里得算法和埃拉托斯特尼筛法的实现方式。...

程序结构（例题：计算最大公约数gcd程序）

A13901339099的博客

12-30

337

感觉c++的头文件跟c有很大相似的地方，但是形式不一样，所以还是要记而且我以前只是照着用，很多没有搞懂意思现在开始学习啦！（ps我去图书馆居然没有找到c++ primer最新版的QAQ) #include <iostream> //in out stream(流) 就是输入输出流啦（我之前一直以为会跟c里面万能头文件stdio.h差不多的来着。。所以看到这个...

递归法计算两个数的最大公约数

qq_43535204的博客

12-14

6845

题目内容：利用最大公约数的性质计算。对正整数a和b，当a>b时，若a中含有与b相同的公约数，则a中去掉b后剩余的部分a-b中也应含有与b相同的公约数，对a-b和b计算公约数就相当于对a和b计算公约数。反复使用最大公约数的上述性质，直到a和b相等为止，这时，a或b就是它们的最大公约数。这三条性质，也可以表示为：性质1 如果a>b，则a和b与a-b和b的最大公约数相同，即Gcd(a, ...

基本算法（用 PASCAL 描述）

降龙十八炒

01-28

1109

基本算法（用 PASCAL 描述）基本算法（用 PASCAL 描述）1.数论算法求两数的最大公约数 function gcd(a,b:integer):integer; begin if b=0 then gcd:=a else gcd:=gcd (b,a mod B); end; 求两数的最小公倍数 function lcm(a,

【AI学习-comfyUI学习-第十二节-FLUX局部重绘工作流-各个部分学习-第十二节】

qq_22146161的博客

12-02

736

最近，学习comfyUI，这也是AI的一部分，想将相关学习到的东西尽可能记录下来。加载图像这就是上传的那张桥墩照片没问题这也算各一个开始吧，我也在学习摸索中。

windows上位机开发学习（二）计时器案例（下） int大小

qq_43091070的博客

11-29

904

本文介绍了Windows上位机开发中计时器案例的代码实现过程。首先通过工具箱添加Timer控件并设置1秒间隔，然后详细讲解了核心代码：1)声明全局变量记录时间；2)实现"开始"按钮点击事件，解析用户输入并初始化计时器；3)编写Timer的Tick事件处理逻辑，每秒更新界面并判断倒计时结束。文章还展示了完成效果图，并附带单片机int类型大小对照表。最后提供了C#串口通信编程的学习参考网址，欢迎交流讨论。

C++基础：Stanford CS106L学习笔记 1 类型与结构

WM2101的博客

12-02

257

本文介绍了C++的类型系统和结构体特性。在类型系统方面，C++采用静态类型，变量类型一旦确定不可更改，与Python的动态类型形成对比。静态类型能提高效率并减少运行时错误。文章还介绍了using类型别名、auto类型推断以及函数重载等现代类型特性。在结构体方面，展示了如何定义和使用结构体，以及使用std::pair模板简化多值返回的实现方式。通过对比Python和C++的代码示例，突出了C++在类型安全性和编译时检查方面的优势。

【Prompt学习技能树地图】LangChain原理及应用操作指南