• Document: Глава 2. ОСНОВЫ АЛГОРИТМИЗАЦИИ И ПРОГРАММИРОВАНИЯ Построение графиков и диаграмм
  • Size: 300.96 KB
  • Uploaded: 2018-12-05 18:59:26
  • Status: Successfully converted


Some snippets from your converted document:

ZGA 04.08.2010 Глава 2. ОСНОВЫ АЛГОРИТМИЗАЦИИ И ПРОГРАММИРОВАНИЯ 7.3. Построение графиков и диаграмм Исследование законов природы и общества немыслимо без построения разнообразных графиков и диаграмм. На уроках математики Вы исследуете функциональные зависимости и строите графики в тетради или на доске, пользуясь карандашом и мелом. Замечательными возможностями обработки и представления данных в виде разнообразных графиков и диаграмм обладают электронные таблицы MS Excel, которые Вы изучали в 10 классе. Познакомимся с построением графиков и диаграмм в среде PascalABC. Пример 1. Составить программу, которая строит график зависимости y(x) =0.4x + 2sin3x на промежутке [-15; 15]. Определим исходные данные. Прежде всего, зададим размеры окна и построим оси координат. Пусть начало отсчета имеет экранные координаты x0=320, y0=200. Для построения графика необходимо выбрать масштаб. Зададим множитель k=20 (единице на графике соответствует 20 пикселей на экране). Выполнять вычисления и построения будем в цикле While, пока x<=15. Сначала запишем функцию y:=0.4*x+2*sin(3*x). Затем перейдем к экранным координатам: x1:=trunc(x0+x*k); y1:=trunc(y0-y*k). Дробную часть отбрасываем, чтобы обеспечить их целочисленность. На каждом шаге цикла будем рисовать окружности небольшого радиуса (например, 2) с координатами центра (x1,y1), которые сольются в линию. Для этого приращение аргумента выберем маленьким, например: x:=x+0.02. Заметим, что начальное значение x=-15 задается перед циклом While. Переменные x0,y0, x1,y1, k имеют тип integer, а переменные x,y тип real. Программа может выглядеть так: Program Grafik; uses GraphABC; Var x0,y0, x1,y1, k : integer; x,y: real; Begin setWindowSize(640,400); x0:=320; y0:=200; k:=20; line(x0,20,x0,380); line(20,y0,620,y0); {оси координат} setPenColor(clRed); x:=-15; { начальное значение аргумента } While x<=15 do begin y:=0.4*x+2*sin(3*x); { функция } ZGA 04.08.2010 Глава 2. ОСНОВЫ АЛГОРИТМИЗАЦИИ И ПРОГРАММИРОВАНИЯ x1:=trunc(x0+x*k); y1:=trunc(y0-y*k); { экранные координаты } circle(x1,y1,2); x:=x+0.02; end; End. Результат работы программы показан на рисунке 2.9. Рис. 2.9 При необходимости на осях координат несложно нарисовать деления. Например, в цикле for с параметром i, который изменяется от 0 до 30 на оси абсцисс отметить 31 деление через k = 20 пикселей. На оси ординат в цикле for с параметром i от 0 до 20 отметить 21 деление. for i:=0 to 30 do line(20+k*i,195, 20+k*i,205); { деления по оси абсцисс } for i:=0 to 20 do line(315, 20+k*i, 325, 20+k*i); { деления по оси ординат } Эффективным средством наглядного представления данных являются диаграммы. Они облегчают сравнение данных, помогают выявлению закономерностей их изменения. Вместо кропотливого сравнения чисел часто достаточно одного взгляда на диаграмму, чтобы увидеть снижаются или растут температуры, урожайности, цены и объемы продаж товаров. В 10 классе Вы

Recently converted files (publicly available):