Sub Z()
Dim a As Integer
a = InputBox("1")
Dim b As Integer
b = InputBox("2")
If Math.Abs(a) > Math.Abs(b) Then a = a / 5
End Sub<span>
</span>
Будет выглядеть как
s:=sqr(a)+(2*a*b*c)+sqr(b)-(4*c);
Это на компе надо делать
Эт училка еб*нутая ,передай ей
1)
П0 1 ВП 3 / [x] П1 С/П П0 ИП1 1 ВП 3 * - С/П
Инструкция: граммы В/О С/П. Результат: килограммы С/П граммы.
2)
^ 1 ВП 4 / [x] С/П
Инструкция: ары С/П.