Dostałem do zrobienia zadanie :
Sprawdz czy 2 liczby są względnie pierwsze. Program trzeba napisać w VBA
Czy mógłbym liczyć na pomoc za 0,5l wódki ?
1
0
Function sprawdz(n As Integer, k As Integer) As Boolean
Dim c As Integer
While k<>0
c = n mod k
n = k
k = c
End While
If n = 1
return true
End If
return false
End Function
0
Dziękuje, w domu sprawdzę jak to działa, a Ty podeslij numer konta w wiadomości to sie odwdzięczę :)
0
Można też przez WorksheetFunction.GCD(a,b)