Составьте программу, которая уменьшает первое число в 5 раз, если первое число больше второго по абсолютно величине (модулю) на языке Visual Basik
Спасибо заранее.
CPCprogrammer:
только на бейсике
Ответы
Ответ дал:
1
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
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
Похожие вопросы
1 год назад
1 год назад
1 год назад
1 год назад
6 лет назад