free pascal 求最大公约数与最小公倍数

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/03 04:11:57
free pascal 求最大公约数与最小公倍数

free pascal 求最大公约数与最小公倍数
free pascal 求最大公约数与最小公倍数

free pascal 求最大公约数与最小公倍数
var n,m,r,t,a:integer;
begin
readln(n,m);
a:=n*m;
if n