Составьте блок-схему и программу ** языке VBA, которая вычисляет наибольший общий...

Question

Составьте блок-схему и программу на языке VBA, которая вычисляет наибольший общий делитель двух целых чисел.( Желательно через цикл For и что бы работало с отрицательными значениями)

Answer 1

' GCD - функция, которая принимает два числа, для которых нужно найти НОД

' К посту приложена фотография с блок-схемой

Function GCD(m As Integer, n As Integer) As Integer

   m = Abs(m)

   n = Abs(n)

   For i = 1 To n * m

       If m Mod i = 0 And n Mod i = 0 Then

           GCD = i

       End If

   Next

End Function

---

Comments

А как её запустить в VBA?

---

1. Зайди в Microsoft Excel (или Word, или PowerPoint)2. Найди пункт Макросы в главном меню (можешь загуглить, как найти этот пункт

---

3. Создай макрос под любым именем (набери имя в соответствующем поле и нажми создать)4. Выдели его и нажми Изменить5. Вставляй код функции перед всем, что есть в редакторе, а в код самого макроса вставь, например, MsgBox (GCD(50, 130))

---

6. Жми F5 и вылетит окошко с ответом

---

Спасибо