Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 17.03.2012, 17:25   #1
MrVi
Пользователь
 
Регистрация: 15.03.2012
Сообщений: 28
Печаль Построить график фун-ии

Постройте график фун-ии.Отделите один минимум
f(x)=cos x*e^sin3x x принодлежит[3,10.2],dx=0.3

(Delphy)

Прошу помощи,не выходит не чего!
MrVi вне форума Ответить с цитированием
Старый 17.03.2012, 18:26   #2
Ezhuk
Форумчанин
 
Регистрация: 09.10.2010
Сообщений: 217
По умолчанию

Построил, можете не благодарить.
Изображения
Тип файла: gif MSP30741a0fe19b7c5199g70000313f45ed9fg5g1i0.gif (3.7 Кб, 125 просмотров)
Ёж птица гордая, пока не пнешь не полетит.
Ezhuk вне форума Ответить с цитированием
Старый 17.03.2012, 18:40   #3
MrVi
Пользователь
 
Регистрация: 15.03.2012
Сообщений: 28
По умолчанию

Цитата:
Сообщение от Ezhuk Посмотреть сообщение
Построил, можете не благодарить.
каким оброзом?
Разве это в делфи не надо как-то записать?
Или ещё каким способом?
Как это расписать?

Последний раз редактировалось MrVi; 17.03.2012 в 19:29.
MrVi вне форума Ответить с цитированием
Старый 17.03.2012, 19:55   #4
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

http://yandex.ua/yandsearch?text=Ser...ammersforum.ru
Используй компонент TChart
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 17.03.2012, 19:56   #5
MrVi
Пользователь
 
Регистрация: 15.03.2012
Сообщений: 28
По умолчанию

Цитата:
Сообщение от Stilet Посмотреть сообщение
http://yandex.ua/yandsearch?text=Ser...ammersforum.ru
Используй компонент TChart
Я вообще не понимаю
не могли бы саму программу написать?

Последний раз редактировалось MrVi; 17.03.2012 в 20:00.
MrVi вне форума Ответить с цитированием
Старый 17.03.2012, 23:06   #6
whatever
a.k.a. Skull
Форумчанин
 
Регистрация: 17.11.2009
Сообщений: 963
По умолчанию

Да конечно могли бы, чего уж там:
Код:
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, TeeProcs, TeEngine, Chart, ExtCtrls,series;

type
  TForm1 = class(TForm)
    Chart1: TChart;
    Button1: TButton;
    Edit1: TEdit;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;
  graf:tlineseries;
implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var
  x,y,min:real;
begin
  graf.ParentChart:=chart1;
  graf.Clear;
  x:=2.97;
  while x<=10.2 do
    begin
      x:=x+0.03;//по заданию тут 0.3 должно быть, но тогда некрасиво, если хочешь - замени. И тремя строчками выше поменяй 2.97 на 2.7
      y:=cos(x)*exp(sin(3*x));
      if x=3 then
        min:=y
      else
        if y<min then
          min:=y;
      graf.AddXY(x,y)
    end;
    edit1.Text:=floattostr(min);
end;
initialization
  decimalseparator:='.';
  graf:=Tlineseries.Create(nil);
end.

Осталось это грамотно перенести в свою программу. Сможешь - пользуйся на здоровье. Если нет, значит хватит расчитывать на халяву и пора браться за ум.
Все тривиальное просто

Последний раз редактировалось whatever; 17.03.2012 в 23:09.
whatever вне форума Ответить с цитированием
Старый 17.03.2012, 23:33   #7
MrVi
Пользователь
 
Регистрация: 15.03.2012
Сообщений: 28
По умолчанию

whatever
Спасибо огромное,очень выручил.
Не надеюсь на халяву,что могу делаю,что не могу читаю....
Но мой минус не могу я с перого раза нормальна написать программу(в данном случае вообще не могу)а объяснить могу....

Ещё раз спасибо

Последний раз редактировалось MrVi; 17.03.2012 в 23:36.
MrVi вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Построить график функций Alexxxxxx Паскаль, Turbo Pascal, PascalABC.NET 9 11.12.2011 20:42
построить график salmon172 Паскаль, Turbo Pascal, PascalABC.NET 0 25.05.2011 22:19
построить график. с++ Yokka C++ Builder 1 13.05.2010 18:23
Построить график!! Inferno777 Помощь студентам 10 30.06.2009 17:46
Построить график функции Horknee Паскаль, Turbo Pascal, PascalABC.NET 15 23.09.2008 09:50