Создать программу на языке Visual Basic

24.05.2013, 11:55. **Показов** 883. **Ответов** 3

Author24 — интернет-сервис помощи студентам

Доброго времени суток. Помогите кто чем может. Я просто очень далека от этого, а любые попытки изучить оставались тщетными. Буду очень благодарна.

@mcherry · 24.05.2013, 12:18

Visual Basic

Sub my_prog()
 
Dim x As Double
Dim y As Double
 
x = InputBox("введите x:")
 
If x >= 0 Then
    y = x + 10
    Else
        y = Sqr(x * x + 1)
End If
 
MsgBox "y=" & y
 
End Sub

@sulfur · 24.05.2013, 12:30

Visual Basic

If x >= 0 Then
    y = x + 10
    Else
        y = Sqr(x * x + 1)
End If

интересный способ оформления else. Никогда такого не видел, но выглядит в чем то практично.
Это не опечатка? Вы сами такое придумали?

@mcherry · 24.05.2013, 12:39

Сообщение от sulfur

Visual Basic

If x >= 0 Then
    y = x + 10
    Else
        y = Sqr(x * x + 1)
End If

интересный способ оформления else. Никогда такого не видел, но выглядит в чем то практично.
Это не опечатка? Вы сами такое придумали?

я вообще с++ учила, вот и привыкла так писать, а оформление - так читабельнее...

ИренНикол36
		1
	Создать программу на языке Visual Basic 24.05.2013, 11:55. Показов 883. Ответов 3 Метки нет (Все метки) Доброго времени суток. Помогите кто чем может. Я просто очень далека от этого, а любые попытки изучить оставались тщетными. Буду очень благодарна. Миниатюры

	24.05.2013, 12:39