Pascal 输入M和N两个正整数,求它们的最小公倍数和最小公约数 要用while做 Pascal 输入M和N两个正整数,求它们的最小公倍数和最小公约数 要用while做 最好后面能附上思路 9点之前要的啊 一定要正

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/28 01:04:12

Pascal 输入M和N两个正整数,求它们的最小公倍数和最小公约数 要用while做
Pascal 输入M和N两个正整数,求它们的最小公倍数和最小公约数 要用while做
最好后面能附上思路 9点之前要的啊
一定要正确的.
我只有这么点分了.
1楼你白痴是伐、
规定要用while做的好伐.
还给你分
除非我跟你一样白痴、、

var i,j,a,m,n:longint;
begin
read(m,n);
if m>n then begin
a:=m;
m:=n;
n:=a;
end;
i:=m;
while (i>1)and(m mod i0)or (n mod i0) do dec(i);
j:=(m*n )div i;
writeln(i,' ',j);
end.