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

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

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

Восстановить пароль
Повторная активизация e-mail

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

Ответ
 
Опции темы Поиск в этой теме
Старый 06.05.2011, 16:48   #1
linan
Новичок
Джуниор
 
Регистрация: 06.05.2011
Сообщений: 2
По умолчанию имитация нейронной сети

Доброго времени суток :-)
Проблемма такая, необходимо создать программу выводящую график похожий на работу импульса нейрона .. импульс состоит из двух частей восходящей (растет по экспоненте) и нисходящей убывает линейно .. импульсы должны напладываться друг на друга ....на рисунке постарался изобразить :-(
ВОТ КОД:
//---------------------------------------------------------------------------

#include <vcl.h>
#include <math.h>
#pragma hdrstop

#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
int chislo;
int maxvosx;
int maxnisx;
float xint1,xint2,x,y;

void graffa(int);
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm1::BitBtn1Click(TObject *Sender)
{ chislo=0; maxvosx=0; maxnisx=0; xint1=0 ; xint2=0; y=0;

chislo=chislokol->Text.ToInt();
maxvosx=vosx->Text.ToInt();
maxnisx=nisx->Text.ToInt();
Chart1->Series[0]->Clear();
for (int ch=0; ch<=chislo; ch++)
{
do
{
xint1++;
y=sqrt(sqrt(xint1));

graffa(y);
// Chart1->Series[0]->Add(y,x,clRed);
}
while (xint1<=maxvosx);
xint1=0;
ShowMessage("nicx");
do
{
xint2=xint2*0.5;
y=xint2;

graffa(y);
// Chart1->Series[0]->Add(y,x,clRed);
}
while (xint2>=maxnisx);
xint2=0;
ShowMessage("vosx");
}
}
//---------------------------------------------------------------------------
void graffa(int e)
{
Form1->Chart1->Series[0]->Add(y,e,clRed);;
}


работа программы на рисунке 2 ... только они не накладываются и нет линейной нисходящей части графика (((
Где я не прав??))
Изображения
Тип файла: jpg Точечный рисунок.jpg (10.4 Кб, 110 просмотров)
Тип файла: jpg Точечный рисунок (2).jpg (119.6 Кб, 100 просмотров)
linan вне форума Ответить с цитированием
Старый 06.05.2011, 16:48   #2
linan
Новичок
Джуниор
 
Регистрация: 06.05.2011
Сообщений: 2
По умолчанию

А!! пишу на С++ Builder 6
linan вне форума Ответить с цитированием
Ответ


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

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

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


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Socket: Подключение клиента из глобальной сети к серверу, расположенному в локальной сети Дамир Общие вопросы .NET 4 01.12.2010 12:12
Имитация onclick Qami JavaScript, Ajax 4 11.03.2010 23:52
Имитация нажатия на f1 ma000123 Общие вопросы C/C++ 4 02.02.2010 19:17
Имитация движения Napster Паскаль, Turbo Pascal, PascalABC.NET 0 20.01.2009 19:19
имитация клавиатуры Var17 Win Api 3 17.06.2008 14:28