Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/6: Рейтинг темы: голосов - 6, средняя оценка - 5.00
0 / 0 / 0
Регистрация: 10.04.2011
Сообщений: 33
1

Построить график функции и вывести его на экран

22.04.2011, 00:02. Просмотров 1131. Ответов 16
Метки нет (Все метки)


нужна помощ
построить график функции и вывести его на экран.
данные тут<<<
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
22.04.2011, 00:02
Ответы с готовыми решениями:

Вывести на экран оси координат с засечками с шагом 1, и построить график заданной функции
написать программу, которая выводит на экран оси координат с засечками с шагом 1, и строит график...

Написать программу вычисления, вывести значения аргумента x и функции. Построить график функции.
Написать программу вычисления, вывести значения аргумента x и функции. Построить график функции. ...

Построить график по таблице с точками в Simulink и вывести его в осциллограф
Добрый день, друзья Прошу помочь с решением задачи Нужно построить график по таблице с...

Построить график функции, определить и вывести все корни функции и выделить различным цветом промежутки знакопостоянства
Здравствуйте уважаемые форумчане , кто свободен помогите пожалуйста , заранее благодарен....

__________________
Помогаю в написании студенческих работ здесь.
16
Модератор
63211 / 46972 / 32373
Регистрация: 18.05.2008
Сообщений: 113,850
22.04.2011, 07:56 2
Там не данные, а фигвам...
0
0 / 0 / 0
Регистрация: 10.04.2011
Сообщений: 33
22.04.2011, 13:18  [ТС] 3
(tg(x-вквадрате))-и все под корнем .x>1. на промежутке (-1;-5)
0
Модератор
63211 / 46972 / 32373
Регистрация: 18.05.2008
Сообщений: 113,850
22.04.2011, 13:28 4
Цитата Сообщение от uppu.are Посмотреть сообщение
x>1. на промежутке (-1;-5)
Это как???
0
0 / 0 / 0
Регистрация: 10.04.2011
Сообщений: 33
22.04.2011, 13:39  [ТС] 5
это простое уравнение
0
Модератор
63211 / 46972 / 32373
Регистрация: 18.05.2008
Сообщений: 113,850
22.04.2011, 13:41 6
Совсем плохой? Если x>1 по условию то как может быть интервал -1..-5?
0
0 / 0 / 0
Регистрация: 10.04.2011
Сообщений: 33
22.04.2011, 13:43  [ТС] 7
а вот хз условие такое
0
Модератор
63211 / 46972 / 32373
Регистрация: 18.05.2008
Сообщений: 113,850
22.04.2011, 13:44 8
Это ты такой....
0
0 / 0 / 0
Регистрация: 10.04.2011
Сообщений: 33
25.04.2011, 14:43  [ТС] 9
хелп!
0
Модератор
63211 / 46972 / 32373
Регистрация: 18.05.2008
Сообщений: 113,850
25.04.2011, 14:52 10
uppu.are, Слушай, хелпер, ссылка твоя не пашет, словами ты задание написать не можешь, чего тебе нужно?
0
0 / 0 / 0
Регистрация: 10.04.2011
Сообщений: 33
25.04.2011, 14:57  [ТС] 11
http://www.fotohost.by/pic_b/1... 7983f7.jpg
0
Модератор
63211 / 46972 / 32373
Регистрация: 18.05.2008
Сообщений: 113,850
25.04.2011, 15:08 12
Oops! Google Chrome could not connect to www.fotohost.by
Да прикрепи ты файл к теме, вообще тупой что ли???
0
0 / 0 / 0
Регистрация: 10.04.2011
Сообщений: 33
25.04.2011, 15:20  [ТС] 13
вот!!
0
Изображения
 
Модератор
63211 / 46972 / 32373
Регистрация: 18.05.2008
Сообщений: 113,850
25.04.2011, 16:34 14
Уже что-то похожее, но все равно глупость. Зачем первое и третье уравнения если интервал от -5 до -1? Наверное все же интервал от -1 до +5?
0
0 / 0 / 0
Регистрация: 10.04.2011
Сообщений: 33
25.04.2011, 20:25  [ТС] 15
третье уравнение ненужно. да скорее всего -1;5
0
Модератор
63211 / 46972 / 32373
Регистрация: 18.05.2008
Сообщений: 113,850
25.04.2011, 20:36 16
Как понял и как в условии, там не непрерывный график, а с шагом 0,5

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
uses graph;
function F(x:real):real;
begin
if x>1 then F:=sqrt(abs(sin(x*x)/cos(x*x))){там под корем по модулю вроде
иначе корень из отрицательных будет}
else if(x>=0)and(x<=1) then F:=-2*x
else F:=exp(cos(x));
end;
var xn,xk,max,min,mx,my,x1,dx,y1,z:real;
    x,y:array[1..20] of real;
    n,x0,y0,i,px,py:integer;
    s:string;
begin
x0:=0;
initgraph(x0,y0,'');
xn:=-1;xk:=5;{интервал по Х}
x1:=xn;
n:=0;
max:=F(xn);
min:=F(xn);
while x1<=xk+0.25 do
 begin
  n:=n+1;
  x[n]:=x1;
  y[n]:=F(x1);
  if y[n]>max then max:=y[n];
  if y[n]<min then min:=y[n];
  x1:=x1+0.5;
 end;
x0:=round(getmaxX*abs(xn)/(xk-xn));{пропорционально положительным и отрицательным}
mx:=(getmaxX-x0-60)/xk;{масштаб по Х}
y0:=round(getmaxy*max/(max-min));{пропорционально положительным и отрицательным}
if max>abs(min) then z:=max else z:=abs(min);
my:=(y0-100)/z;{по У}
setbkcolor(15);{цвет фона}
setcolor(8);{цвет линий}
line(0,y0,getmaxX,y0);{оси}
line(x0,0,X0,getmaxY);
for i:=1 to 20 do{максимальное количество засечек в одну сторону}
  begin
    line(x0-3,y0+round(i*my/2),x0+3,y0+round(i*my/2));{засечки на оси У}
    line(x0-3,y0-round(i*my/2),x0+3,y0-round(i*my/2));
    line(x0+round(i*mx/2),y0-3,x0+round(i*mx/2),Y0+3); {засечки на оси Х}
    line(x0-round(i*mx/2),y0-3,x0-round(i*mx/2),Y0+3);
    str(i/2:0:1,s);
    {подпись оси У}
    outtextXY(x0-35,y0+round(i*my/2),'-'+s);{соответственно засечкам}
    outtextXY(x0-35,y0-round(i*my/2),s);
    {подпись оси Х}
    outtextXY(x0+round(i*mx/2),y0+10,s);
    outtextXY(x0-round(i*mx/2),y0+10,'-'+s);
  end;
{центр}
outtextXY(x0+5,y0+10,'0');
{подписи концов осей}
outtextXY(getmaxX-10,y0-10,'X');
outtextXY(x0-10,10, 'Y');
setcolor(8);
x1:=xn;
dx:=0.5;
moveto(x0+round(x[1]*mx),y0-round(y[1]*my));
for i:=1 to n do
 begin
  setcolor(12);
  lineto(x0+round(x[i]*mx),y0-round(y[i]*my));
  setcolor(10);
  circle(x0+round(x[i]*mx),y0-round(y[i]*my),2);
 end;
readln
end.
0
0 / 0 / 0
Регистрация: 10.04.2011
Сообщений: 33
26.04.2011, 01:17  [ТС] 17
cпасибо
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
26.04.2011, 01:17

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь или здесь.

Построить график функции F(x) на заданном интервале с заданным шагом и вывести значения х и функции F(x) в таблицу в графическом режиме
Построить график функции F(x) на заданном интервале с заданным шагом и вывести значения х и функции...

Задание: Построить график функции, определить и вывести все корни функции и выделить различным цветом промежутки знакопостоянства
Уважаемые форумчане, кому не сложно помогите пожалуйста: Задание: Построить график функции,...

Вывести таблицу значений функции и построить график
Здравтвуйте, у меня возникли проблемки с решением этих двух задач 1)Определить следующую функцию...

Вывести таблицу значений и построить график функции
Помогите сделать задачу задача Вывести таблицу значений и построить график функции:

Нужно построить график функции y = x2 на интервале [-3,3] и Построить график функции (эллипс) x^2/16 + y^2/9 = 1
Нужно построить график функции y = x2 на интервале и Построить график функции (эллипс) x^2/16 +...

Вывести на экран монитора и напечатать таблицу значений аргумента и функции, а также график функции средствами Exel
Вывести на экран монитора и напечатать таблицу значений аргумента и функции, а также график функции...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
17
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.