QBASICBOOK.ru: сайт про QB64

В этой статье мы рассмотрим ещё один вариант построителя графиков функций. Он не менее интересный и более красивый. Исходный текст программы достаточно простой и компактный.

---

1. SCREEN 12 'graficheskiy rezhim 640x480
2. C = 2 'tsvet linii
3. LINE (0, 240)-(640, 240), C 'liniya po-gorizontali
4. LINE (320, 0)-(320, 480), C 'liniya po-vertikali
5. LOCATE 1, 42: PRINT "Y"
6. LOCATE 16, 80: PRINT "X"
7. MX = 80 'masshtab po OX
8. MY = 80 'masshtab po OY
9. FOR X = MX TO 640 STEP MX
10.     LINE (X, 238)-(X, 242)
11. NEXT
12. FOR Y = MY TO 480 STEP MY
13.     LINE (318, Y)-(322, Y)
14. NEXT
15. C = 4 'tsvet grafikov
16. 'RISUYEM GRAFIKI FUNKTSIY
17. FOR X = -8 TO 8 STEP 0.0001
18.     Y = X ^ 2
19.     PSET (320 + X * MX, 240 - Y * MX), C
20. NEXT
21. FOR X = 0 TO 8 STEP 0.0001
22.     Y = SQR(X)
23.     PSET (320 + X * MX, 240 - Y * MX), C + 2
24. NEXT
25. FOR X = -8 TO 8 STEP 0.0001
26.     Y = 1 / X
27.     PSET (320 + X * MX, 240 - Y * MX), C - 1
28. NEXT
29. FOR X = -8 TO 8 STEP 0.0001
30.     Y = X
31.     PSET (320 + X * MX, 240 - Y * MX), C + 5
32. NEXT

---

Рисунок 1 – Исходный текст графопостроителя 

Рисунок 2 – Построение графиков функций

Ваша задача состоит в том, чтобы разобраться с этой программой самостоятельно.

Спасибо за прочтение этой статьи.