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

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

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


textual

Код к задаче: «снова не могу написать программу( - VB»

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)
Эта работа вам не подошла?

Вы всегда можете заказать любую учебную работу у наших авторов от 20 руб.


СДЕЛАЙТЕ РЕПОСТ

14   голосов, оценка 4.000 из 5

Источник
Похожие ответы