-
Notifications
You must be signed in to change notification settings - Fork 72
/
Copy pathFactor.ahk
29 lines (26 loc) · 917 Bytes
/
Factor.ahk
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
/*
Descomposición prima. Descompone el número especificado en en forma de producto.
Parámetros:
Number: El número deseado.
Delimiter: El caracter de delimitación deseado. Por defecto es una nueva línea.
Observaciones:
Un número primo es un número natural que tiene dos divisores naturales: el uno y él mismo. Los demás números, se llaman integrantes.
La factorización es la descomposición de un número natural en un producto de factores primos.
Return:
Devuelve un Array con todos los valores.
*/
Factor(Number)
{
Local OutputVar := []
, F := 2
While (F <= Number)
{
If (Mod(Number, F) == 0)
{
OutputVar.Push(F)
OutputVar.Push(Factor(Number / F)*)
Return (OutputVar)
}
}
Return ("")
} ;http://rosettacode.org/wiki/Prime_decomposition#AutoHotkey