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

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/06 03:41:14
Pascal 输入M和N两个正整数,求它们的最小公倍数和最小公约数 要用while做 Pascal 输入M和N两个正整数,求它们的最小公倍数和最小公约数 要用while做 最好后面能附上思路 9点之前要的啊 一定要正

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

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