作业帮 > 综合 > 作业

pascal 输入任意两个自然数M和N,求两个自然数M和N的最大公约数和最小公倍数

来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/11/09 10:39:02
pascal 输入任意两个自然数M和N,求两个自然数M和N的最大公约数和最小公倍数
用While 循环做,要一次输出最大公约数和最小公倍数并换行.
还有一题:PASCAL 数学上把除了1和它本身,没有别的数能够整除它的自然数叫做素数(或质数).现在由键盘输入一个自然数N,编程判断N是否是素数,是则输出“Yes”,否则输出“No”.
公约数 公倍数
var
a,b,i,p,n,m:longint;
begin
read(a,b);
if a>b then p:=a
else p:=b;
while i