Определить , лежит ли точка a в области , ограниченной параболой y=2-x^2 и осью абсцисс. ответ вывести в виде сообщения. параметры: 1)x=3,5; y=7,2 2)x=-0,5; y=1,2 3)x=0,72; y=-3,12 , нужно решить через оператор case без всяких других а именно через кейс

парабола y=2-x^2=(√2+x)(√2-x) пересекает ось абсцисс в точках x1=-√2; x2=√2.

поэтому нужно проверять два условия: (x1 ≤ x ≤ x2) и (0 ≤ y ≤ 2-x^2)

с операторами select case это будет так:

x = inputbox ("введите x")

y = inputbox ("введите y")

select case x

case -sqrt(2) to sqrt(2)

_ _ select case y

_ _ case 0 to (2 - x^2) : msgbox ("попадает! ")

_ _ case else : msgbox ("y не попадает")

_ _ end select

case else : msgbox ("x не попадает")

end select

только проверь, как в твоей версии vb пишется функция квадратного корня. в некоторых версиях бывает sqr вместо sqrt.

на знаки подчеркивания _ не обращай внимания, это для выравнивания.

там пробелы должны быть, но сайт их съедает.

дело в том, что цифра это знак, и буква это знак.

30 * 70 = 2100 символов на 1 странице

5 * 2100 = 10500 символов на 5 страницах

при кодировке ascii - 1 символ = 1 байт, значит 20500 байт оперативной памяти займет этот текст.