3)интернет,1)информация,2)итекет,5)плагиат,
Function func1(a As Double) As Double
Dim i As Integer, b As Double
i = 1 - Sgn((Abs(a) - a) / 2)
b = Sqr(a * i)
a = a * 2 + i * (b - 2 * a)
func1 = a
End Function
Ответ:
Чтобы сложить дроби с одинаковыми знаменателями, надо сложить их числители, а знаменатель оставить без изменений.Чтобы вычесть дроби с одинаковыми знаменателями, надо из числителя первой дроби вычесть числитель второй, а знаменатель опять же оставить без изменений.
Объяснение:
все эти "предметы" использует человек, сидя.