Графическое решение квадратных уравнений - VB

Узнай цену своей работы

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

Помогите пожайлуста решить графически квадратное уравнение в visual basic!!!!

Решение задачи: «Графическое решение квадратных уравнений»

textual
Листинг программы
Private Sub Command1_Click()
a=inputbox ("введите переменную")
b=inputbox ("введите переменную")
c=inputbox ("введите переменную")
d=b^2-4*a*c
if d>=0 then
x1=-b+sqrd/2*a
x2=-b-sqrd/2*a
else 
x1="нет корней"
x2="нет корней"
end if
print x1,x2
 scale (-5,0)-(5,0)
line (0,-5)-(0,5)
for x=-5 to x=5
y=x^2
pset (x,y)
next 
print 
End Sub

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

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

9   голосов , оценка 3.889 из 5
Похожие ответы