Maxvell
11-06-2002, 22:54
Так как VB у меня нету а на завтра очень надо проверить нижепреведённый код просьба проверить его:
DIM a,x,n,y,s,single
private sub form 1.load()
x = val (input box("ввод x"))
a = val (input box("ввод a"))
n = val (input box("ввод n"))
if x < = 32 and a = 5 and n = 5 than y = (a*x в степени2) в степени 1/n
else if x > 5 and if n > = 6 than
y = (log(n) / log(10)) / x
else y = n
and if
mfg box (y) and sub
DIM a,x,n,y,s,single
private sub form 1.load()
x = val (input box("ввод x"))
a = val (input box("ввод a"))
n = val (input box("ввод n"))
if x < = 32 and a = 5 and n = 5 than y = (a*x в степени2) в степени 1/n
else if x > 5 and if n > = 6 than
y = (log(n) / log(10)) / x
else y = n
and if
mfg box (y) and sub