Программирование функций, Программирование процедур, рекурсивную подпрограммa - VB
Формулировка задачи:
1 (Программирование функций)
Вычислить площадь правильного шестиугольника со стороной a, используя подпрограмму вычисления площади треугольника.2 (Программирование процедур)
Два натуральных числа называются «дружественными», если каждое из них равно сумме всех делителей (кроме его самого) другого (например, числа 220 и 284). Найти все пары «дружественных чисел», которые не больше данного числа N.3 ( Решите задачу, используя рекурсивную подпрограмму: )
Описать рекурсивную логическую функцию Simm(S, J), проверяющую, является ли симметричной часть строки S, начинающаяся г-м и кончающаяся -;-м ее элементами. ' ' Помогите с решением данных задач. Если не трудно начиная с дим (вб 2008 тоже не плохо бы )) Спасибо.Решение задачи: «Программирование функций, Программирование процедур, рекурсивную подпрограммa»
textual
Листинг программы
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim a As Single a = InputBox("A") MsgBox(area(a) * 6) End Sub Public Function area(ByVal a As Single) As Double area = (Math.Sqrt(3) / 4) * a ^ 2 End Function
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д