Исходный код программы

CLS

PRINT "vvedite interval lokalizacii kornya"

INPUT "a=", a

INPUT "b=", b

eps = .000001

k = 0

fa = a ^ 2 – 6* a - 10

fb = b ^ 2 - 6* b - 10

IF fa * fb < 0 THEN GOTO 80

PRINT "oshibka v vybore intervala"

GOTO 100

80 x = (a + b) / 2

PRINT x

SLEEP 0

k = k + 1

fx = x ^ 2 - 6* x - 10

IF fx = 0 THEN GOTO 140

IF fa * fx < 0 THEN b = x: GOTO 130

a = x

130 IF ABS(b - a) > eps THEN GOTO 80

140 PRINT "x=", x

PRINT "f(x)=", fx

PRINT "k=", k

100 SLEEP 0

END

Результат работы программы

Находим первый корень

Находим второй корень

Вывод.

Как мы видим по результатам работы программы, были получены точки x=-1,359, x=7.359, что соответствует значению функции, когда f(x)=0 и значению функции в этой точке соответственно. Программа прошла 22 цикла. Следовательно, программа работает правильно, и полученные значения соответствуют действительности.

Задача №2. Поиск экстремумов функции методом перебора (сканирование интервала).

График