Ksenia333
Опубликовано 7 лет назад по предмету Информатика от Ksenia333


Ввести число. Если оно неотрицательно, вычесть из него 50, в противном случае прибавить к нему 100.

  1. Ответ
    Ответ дан Lex09

    Microsoft Visual Basic 2010(более ранние тоже прокатят)

     

     Dim I As Single    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load        I = Val(InputBox("Введите число"))        If I >= 0 Then            I = I - 50        Else            I = I + 100        End If        MsgBox(I)    End Sub

     

    Просто на Basic

    Dim I As Single

    Input(I)

    If I >= 0 Then            I = I - 50        Else            I = I + 100        End If

    Print I

    End

     

Не тот ответ, который вам нужен?
Найди нужный
Самые новые вопросы
99335871
Другие предметы - 1 год назад

В какой оболочке земли живёт большинство живых организмов?

99335871
Другие предметы - 1 год назад

Из каких неживых частей состоит экосистема

mandrykin
Другие предметы - 1 год назад

На какие расы делятся население земли

kinda2007
Другие предметы - 1 год назад

Определение статуса военнослужащего (краткий ответ!!)

Санёк1999
Другие предметы - 1 год назад

Проведи следущие наблюдения в классе: один учащийся спокойно сидит за партой, слушая объяснения учителя; второй записывает план объяснения в тетради ; третий ученик вышел к доске отвечать на вопрос учителя. назови движущиеся тела. относительно каких других тел они движутся ?

Информация

Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.

Задай вопрос

Лучшие за месяц


Интересные статьи:


Пошаговый план подготовки к ЕГЭ за полгода для школьников
Не сдал ЕГЭ пересдача апелляция альтернативные пути
10 ошибок на ЕГЭ по русскому и способы их избежать
Выбор предметов ЕГЭ для поступления
Секреты подготовки к экзаменам дома от отличников