Компонент TChart может строить самые различные графики и диаграммы.
Рассмотрим задачу построения графика на примере синусоиды (y=sin(x)).
Данные для построения графика представляют собой набор точек (X,Y). Поэтому для того чтобы его сформировать необходимо вычислить значение функции для каждой точки того диапазона, в котором требуется построить график.
Местоположение промежуточных точек рассчитывается как положение предыдущей точки плюс некоторый интервал (шаг). Для первой промежуточной точки предыдущей точкой является граница диапазона.
Построим график синусоиды для диапазона от 0 до 2π.
Вначале создадим ряд данных компонента TChart, который, собственно, и будет отображать график, а также зададим нижнюю границу диапазона и шаг.
Источник: streletzcoder.ru
Составить программу для вычисления функции, заданной графиком — Turbo Pascal (102406)
Составить программу для вычисления функции, заданной графиком. Помогите пожалуйста.
Таблица значений функции и ее график. 7 класс.
Код к задаче: «Составить программу для вычисления функции, заданной графиком»
Листинг программы
var x,y:real; begin write(‘x=’);readln(x); if x2 then y:=0 else y:=x-2; writeln(‘y=’,y:0:2) end.
8 голосов , оценка 3.375 из 5
Похожие ответы
- Составить программу для нахождения максимальных элементов матриц
- Составить программу для вычисления значения интеграла
- По введенным значениям аргумента х вычислить значение функции, заданной графически
- Программа для выполнения простейших арифметических расчетов
- Вычислить значение функции, заданной графически
- Программа для вычисления значения функции
- Программа для вычисления значения функции
- Написать программу для вычисления заданного выражения
- Вычисление значения функции заданной в виде графика
- Вычисление значения функции заданной в виде графика
- Составить программу для нахождения сумм элементов каждой строки матрицы, используя подпрограмму-функцию
Все виды студенческих работ на заказ
Источник: studassistent.ru
Вычисление значения функции y(x)
Вычислить значение функции y(x) на промежутке [1;2.8] с шагом h=0.3.
В Pascal:
if z=0 then writeln(‘NO’) else
В Excel:
В MathCAD:
В Delphi:
procedure TForm1.BitBtn1Click(Sender: TObject);
procedure TForm1.BitBtn2Click(Sender: TObject);
Вывод:т.к. ответы в Pascal,Excel,MathCAD и Delphi сошлись – решение верно.
Блок-схема алгоритма решения задания №1.1
Вычислить значение функции y(x) с условием на промежутке [-2;3] с шагом h=0.5
В Pascal:
writeln(‘Please ENTER Xn,Xk,h=’);
Вычисление значений функций по формуле. Алгебра, 7 класс
if x>2 then y:=sqr(cos(x))/(x-2)
Результаты вычислений:
компьютерный вычисление функция алгоритм
В Excel:
В MathCAD:
В Delphi:
if x>2 then y:=sqr(cos(x))/(x-2);
Вывод:т.к. ответы в Pascal, Excel, MathCADи Delphiсошлись – решение верно.
Блок-схема алгоритма решения задания: 1.2
Нахождение функции, заданной условием:
Вычислить функцию y(x) по заданному массиву x
В Pascal:
var x,y:array[1..n] of real;
Результаты вычислений:
В Excel:
В MathCAD:
В Delphi:
var x,y:array[0..3]of real;
procedure TForm1.BitBtn2Click(Sender: TObject);
Вывод:т.к. ответы в Pascal,Excel,MathCAD и Delphi сошлись – решение верно.
Блок-схема алгоритма решения задания №1.3
Нахождение функции заданном массиве:
Найти сумму, если задана функция y(x), задан массив а, даны Xn, n, h.
В Pascal:
a:array [1..n] of Real;
Write(‘enter please Xn,h=’);
Write(‘enter please a[i]=’);
Результаты вычислений:
В Excel:
В MathCAD:
В Delphi:
var a:array[0..5]of real;
memo1.Lines.Add(‘ Ñóììà= ‘+FormatFloat(‘0.000’,s));
procedure TForm1.BitBtn2Click(Sender: TObject);
Вывод:т.к. ответывPascal, Excel, MathCAD иDelphiсошлись – решениеверно.
Блок-схема алгоритма решения задания №1.4
Нахождение функции, если дан x, h, n, задан массив:
Источник: smekni.com