Все лабы для ИУ-7 - решения и задания (Студентам08ЗД к Упр08 Построение графика функции)

Посмотреть архив целиком

Упр7 2008 Сем2 МГ2 ПОСТРОНИЕ ГРАФИКА ФУНКЦИИ

Форма должна иметь вид

В полях ввода задаем границы отрезка, на котором строится график, раскрывающийся список представляет заранее подготовленный набор функций, кнопки – для построения графика и завершения работы программы.

п\п Tform1.gr(F:fun) построения графика функции F.

  1. Вычислить, изменяя аргумент с шагом dX=(Xmax-Xmin)/N (N=100), и сохранить в массивах X и Y по 101 значению аргумента и функции, а также найти Ymin и Ymax функции.

  2. Залить область вывода белым цветом.

  3. Вычислить коэффициенты:
    mx=(XmaxE-XminE)/(Xmax-Xmin)
    my=(YmaxE-YminE)/(Ymax-Ymin)
    и массивы KX и KY перехода к координатам канвы формы от мировых:
    KX[I]=ROUND(XminE+(X[I]-Xmin)*mx)

  4. KY[I]=ROUND(YminE-(Ymax-Y[I])*my)

  5. Выполнить вывод вертикальных линий координатной сетки с шагом
    Nx=(XmaxE-XminE)/NdX (см. программу) и их оцифровку.

  6. Выполнить вывод горизонтальных линий координатной сетки
    Ny=(YmaxE-YminE)/NdY (см. программу) и их оцифровку.

  7. Вывести линию графика процедурой LineTo(KX[I],KY[I]) цветом
    Canvas.Pen.Color=rgb(210,10,24).

  8. Вывести над графиком текст ‘График функции ’+ss (ss – выражение функции)

п\п TForm1.ComboBox1Change задает глобальным
d:=ComboBox1.ItemIndex; – номер выбранной функции 0..4 и

ss:=ComboBox1.items[d]; - выражение выбранной функции.

п\п TForm1.Button1Click запускает Tform1.gr(FF[d]) рисование графика, где FF – массив с именами п\п-функций, вычисляющих выражения, отображаемые в списке ComboBox1.

п\п TForm1. RedrawForm1 перерисовывает форму и график.

п\п TForm1.FormCreate задает начальные значения полям ввода начала (1) и конца (12) отрезка аргумента, номер d=0 функции, ss=ComboBox1.items[d] - текст её выражения, высоту (400) и ширину (600) формы и вызывает п\п RedrawForm1 перерисовывки формы и графика.

п\п TForm1.FormResize вызывает п\п RedrawForm1 перерисовывки формы и графика при всяком изменении размеров формы.

п\п TForm1. FormActivate вызывает п\п RedrawForm1 перерисовывки формы и графика при активизации формы, чтобы восстановить график, если форму закрывало другое окно.


Случайные файлы

Файл
91432.rtf
130382.rtf
184845.doc
71576.rtf
85049.rtf




Чтобы не видеть здесь видео-рекламу достаточно стать зарегистрированным пользователем.
Чтобы не видеть никакую рекламу на сайте, нужно стать VIP-пользователем.
Это можно сделать совершенно бесплатно. Читайте подробности тут.