Снова не могу написать программу( - VB

Узнай цену своей работы

Формулировка задачи:

нужно написать программу.. сама пробую, ничего не получается..могу сделать только в обычном бэйсике.. Даны два числа x и y. Вычислить z=у/2, если х ≤ у и у ≤ 10. 1+2х , в противном случае заранее благодарю за помощь..

Решение задачи: «Снова не могу написать программу(»

textual
Листинг программы
Dim x, y, z As Double
x = InputBox("x=", "")
y = InputBox("y=", "")
If x <= y And y <= 10 Then
   z = y / 2
   Else: z = 1 + 2 * x
End If
MsgBox (z)

ИИ для рефератов и докладов


  • Экспорт Word по ГОСТу
  • Минимум 80% уникальности текста
  • Поиск релевантных источников в интернете
  • Готовый документ за 2 минуты

Оцени полезность:

14   голосов , оценка 4 из 5
Похожие ответы