/
n-dimens
/
pascalabcnet
Обзор
Документация
Войти
/
n-dimens
/
pascalabcnet
Код
Запросы
0
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
master
TestSuite/CompilationSamples/DrawGraphic.pas
11 строк
367 B
Бондарев Иван
bug fix #585
17 дек 2017, 14:40
17 дек 2017, 14:40
fb60f88
Код
Авторство
О чём код?
uses GraphWPF; begin Window.Title := 'Графики функций'; var ww := Window.Width / 2; var hh := Window.Height / 2; DrawGraph(x -> sin(4 * x) + cos(3 * x), -5, 5, 0, 0, ww, hh); DrawGraph(x -> x * x, -5, 5, ww - 1, 0, ww, hh); DrawGraph(x -> exp(x), -5, 5, 0, hh-1, ww, hh); DrawGraph(x -> x*cos(2*x-1), -5, 5, ww - 1, hh-1, ww, hh); end.