Написать программу на языке QBasic, которая рисует график функции, вида на заданном интервале [k; m]
Категория: Basic
2011-09-09 16:46:30
Написать программу на языке QBasic, которая рисует график функции, вида на заданном интервале [k; m]. Коэффициенты A, B, C и интервал [k; m] указаны в таблице.
A | B | C | k | m |
---|---|---|---|---|
0 | 1 | 1 | -10 | +10 |
code: #basic
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
автор: >Quiet Snow<
Поделиться: