Написать программу на языке QBasic, которая рисует график функции, вида на заданном интервале [k; m]

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

Написать программу на языке QBasic, которая рисует график функции, вида на заданном интервале [k; m]. Коэффициенты A, B, C и интервал [k; m] указаны в таблице. A B C k m 0 1 1 -10 +10

Решение задачи: «Написать программу на языке QBasic, которая рисует график функции, вида на заданном интервале [k; m]»

Листинг программы

SCREEN 12
WINDOW (-32, -24)-(32, 24)
  A = 0
  B = 1
  C = 1
  k = -10
  m = 10
 LINE (k, 0)-(m, 0), 8
 LINE (0, k)-(0, m), 8
 FOR u = -10 TO 10
   LINE (u, -.2)-(u, .2), 8
   LINE (-.2, u)-(.2, u), 8
 NEXT
 WHILE INKEY$ = ""
   x = RND * (m - k) + k
   y = A * x * x + B * x + C
   PSET (x, y), 10
 WEND

Объяснение кода листинга программы

В данном коде используется язык программирования QBasic

SCREEN 12 - устанавливает размер экрана, в данном случае 12.
WINDOW (-32, -24)-(32, 24) - устанавливает границы окна, в данном случае от -32 до -24 по вертикали и от 32 до 24 по горизонтали.
A = 0, B = 1, C = 1 - инициализация переменных A, B и C.
k = -10, m = 10 - задают интервал для построения графика от -10 до 10.
LINE (k, 0)-(m, 0), 8 - рисует горизонтальную линию от (-10, 0) до (10, 0) с помощью функции LINE.
LINE (0, k)-(0, m), 8 - рисует вертикальную линию от (0, -10) до (0, 10) с помощью функции LINE.
FOR u = -10 TO 10 - начинает цикл от -10 до 10.
LINE (u, -.2)-(u, .2), 8 - рисует горизонтальную линию от (u, -0.2) до (u, 0.2) с помощью функции LINE.
LINE (-.2, u)-(.2, u), 8 - рисует вертикальную линию от (-0.2, u) до (0.2, u) с помощью функции LINE.
NEXT - переходит к следующему шагу цикла.
WHILE INKEY$ = `` - начинает цикл, который будет выполняться до тех пор, пока INKEY$ не станет отличным от пустой строки.
*x = RND (m - k) + k** - вычисляет значение переменной x.
*y = A x x + B x + C** - вычисляет значение переменной y.
PSET (x, y), 10 - рисует точку с координатами (x, y) с помощью функции PSET.
WEND - переходит к следующему шагу цикла. Получается, что данный код рисует график функции y = Ax^2 + Bx + C на интервале [-10; 10] и запрашивает у пользователя ввод, чтобы определить, когда следует прекратить построение графика.