1 2 3 4 5 6 7 | SCREEN 12 LINE ( 0 , 200 )-( 400 , 200 ) LINE ( 100 , 0 )-( 100 , 400 ) FOR x = - 10 TO 10 STEP 0.1 y = EXP(x - 2 ) / (x - 2 ) PSET (x + 100 , 200 - y) NEXT |
Результат работы программы

Тестирование выполнено в программе QB64 ( Скачать )