BASIC. Составить алгоритм и программу решения квадратного уравнения ax^2+bx+c=0 ...

Question

BASIC.

Составить алгоритм и программу решения квадратного уравнения ax^2+bx+c=0
Провести контрольное исполнение алгоритма.
Примечание: d=b^2-4ac; x1=(-b+sqr(d))/2a; x2=(-b-sqr(d))/2a

Составить алгоритм и программу вычисления суммы N членов последовательности, общий член которой задан формулой ai=i^2-2i. Исполнить для N = 3.

Comments

QBasic

---

??

---

угу

Answer 1

1)

CLS
INPUT "a = ", a
INPUT "b = ", b
INPUT "c = ", c
D = b * b - 4 * a * c
IF D >= 0 THEN
PRINT "x1 = "; (-b + SQR(D)) / (2 * a)
PRINT "x2 = "; (-b - SQR(D)) / (2 * a)
ELSE
PRINT "Korney net"
END IF

a = 3
b = 7
c = 4
x1 = -1
x2 = -1.333333



2)

CLS
INPUT "N = ", N
FOR i = 1 TO N
    S = S + i * (i - 2)
NEXT i
PRINT "S = "; S

N = 3
S =  2