Составьте программу, которая уменьшает первое число в 5 раз, если первое число больше второго по абсолютно величине (модулю) на языке Visual Basik
Спасибо заранее.

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

Оцени ответ

Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!