Создать программу в бейсик Автомобиль трогается с места и его скорость каждую секунду увеличивается на 4 км/ч.Какова скорость через 12с?
Создать программу в бейсик
Автомобиль трогается с места и его скорость каждую секунду увеличивается на 4 км/ч.Какова скорость через 12с?
Гость
Ответ(ы) на вопрос:
ГостьSub car()
Dim s As Double
For i = 1 To 12
s = s + 4
Next i
MsgBox ("Скорость автомобиля через 12 секунд равна " + CStr(s) + " км/ч")
End Sub
Не нашли ответ?
Похожие вопросы