el MCD creo que es asi, suponiendo que los dos numeros enteros son mayores o iguales a 1:
Accion Principal
var
a, b, x, resto : entero
Fvar
leer (a, b)
si a < b
x:= a
a:= b
b:= x
Fsi
Mientras resto <> 0 ó b
resto: = a % b
a:= b
b:= resto
Fmientras
escribir (a)
Facción
Pero el mínimo comun multiplo no se hacerlo, alguien podría ayudarme por favor?
muchas gracias de antemano
Accion Principal
var
a, b, x, resto : entero
Fvar
leer (a, b)
si a < b
x:= a
a:= b
b:= x
Fsi
Mientras resto <> 0 ó b
resto: = a % b
a:= b
b:= resto
Fmientras
escribir (a)
Facción
Pero el mínimo comun multiplo no se hacerlo, alguien podría ayudarme por favor?
muchas gracias de antemano
Comentario