Решение задач в Visual Basic? - VB

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

Есть задача (к сожалению не могу написать формулу), решение которая так выглядит на яз. программирования PascalABC:

                    Листинг программы
                
 
                        
                          
                    
Program My_program;
var x, y, t, z: real;
begin
    Write('Вводите X:  ');  Readln(x);
    Write('Вводите Y:  ');  Readln(y);
    Write('Вводите t:  ');  Readln(t);
    z:=( (Power (SQRT(Power(y,-x)+Power(x,-y)+EXP(2*x-y)),3))/(y*y+x*x+t*t))-SQR(t);
    Writeln('Z = ', z);
end.

А как написать эту программу на Visual Basic? Заранее спасибо

Решение задачи: «Решение задач в Visual Basic?»

textual
                            Листинг программы 
                        
 
                        
                          
                    
Sub Main()
Dim x As Double, y As Double, t As Double, z As Double
  x = InputBox("Вводите X:")
  y = InputBox("Вводите Y:")
  t = InputBox("Вводите t:")
  z = (Sqr(y ^ -x + x ^ -y + Exp(2 * x - y)) ^ 3 / (y * y + x * x + t * t)) - t * t
  MsgBox "Z = " & z
End Sub

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

15 голосов , оценка 4.067 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Похожие ответы