Составьте программу вычисления значения переменной по заданной расчетной формуле и...

Question

Составьте программу вычисления значения переменной по заданной расчетной формуле и набором исходных данных
Y=sin(x^2+a)-корень x/b A=1.1
Z = x^2/a+cos(x+b)^3 x=0.2
B=0.004

Answer 1

Begin
var (a,x,b):=ReadInteger3('Введите a,x,b');
Println('Y=',sin(abs(x)+a)-sqrt(x/b));
Println('Z=', abs(x)/a+abs(cos(x+b))*cos(x+b));
end.

P. S Написано на PacalABC. NET, проверьте на работоспособность, писал без компилятора.

Comments

Простите что не написал на каком языке писать программу:Visual Basic

---

Оу, я незнаю Визуал Бейсика

---

Жалко( но все равно спасибо

Answer 2

' Basic консольное
        Dim x As Double, y As Double, z As Double, a As Double, b As Double
        a = 1.1
        x = 0.2
        b = 0.004
        z = sin((x * x) + a) - sqr(x / b)
        y = (x * x) / a + cos(x + b) ^ 3
        Print "z = "; z
        Print "y = "; y


' Visual Basic 2015 с формами
        Dim x As Double, y As Double, z As Double, a As Double, b As Double
        a = 1.1
        x = 0.2
        b = 0.004
        z = Math.Sin((x * x) + a) - Math.Sqrt(x / b)
        y = (x * x) / a + Math.Cos(x + b) ^ 3
        Label1.Text = "z = " + z.ToString
        Label2.Text = "y = " + y.ToString

Comments

Спасибо) но у меня вопрос вы знаете Visual Basic

---

У тебя что-то не работает?