Рекурсивный алгоритм распознавания образов, страница 6

j=1;

for(i=1;i<=StrToInt(ENPer->Text);i++)

{

while(((EElem->Text[j]<'0')||(EElem->Text[j]>'9'))&&(EElem->Text[j]!='-')) j++;

if(EElem->Text[j]=='-')

{

sgn=-1;

j++;

}

else sgn=1;

while((j<=EElem->Text.Length())&&(EElem->Text[j]!='.')&&

(EElem->Text[j]!=',')&&(EElem->Text[j]!=' '))

{

mas[i]=mas[i]*10+EElem->Text[j]-'0';

j++;

}

if((j<=EElem->Text.Length())&&((EElem->Text[j]=='.')||

(EElem->Text[j]==',')))

{

k=1;

float per;

j++;

while((j<=EElem->Text.Length())&&(EElem->Text[j]!=' '))

{

k=k*10;

per=EElem->Text[j]-'0';

mas[i]=mas[i]+per/k;

j++;

}

}

mas[i]=mas[i]*sgn;

}

EClass->Text=FloatToStrF(Prognoz(&mas[0],StrToInt(ENClas->Text),

StrToInt(ENPer->Text)),ffFixed,6,0);

delete[] mas;

}

}

//--------------------------------------------------------------------------void __fastcall TForm1::FormClose(TObject *Sender, TCloseAction &Action)

{

delete[] Data;

}

//--------------------------------------------------------------------------6. Примеры работы программы

Тест1:

С первого января 2003 года вступает в силу указ об изменении тарифов на уплату дорожного налога, который автовладелец обязан платить ежегодно в зависимости от мощности (л.с.) своего автомобиля.

Компетентными источниками были представлены следующие расценки:

1)до 100 л.с. – 5 руб. за л.с. 

2) от 100 до 150 – 7 руб. за л.с.

3) от 150 до 200 – 10 руб. за л.с.

4) от 200 до 350 – 20 руб. за л.с.

5) свыше 350 – 30 руб. за л.с.

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

Исходные данные.

Количество переменных:  1- мощность автомобиля.

Количество классов:     5- тарифы в зависимости от мощности.

Количество наблюдений: 40- существующие мощности автомобилей.

Результат:

Тест2:

Человеку, закончившему свое образование важно знать на какую сумму денег он может рассчитывать при получении работы. Сейчас большинство фирм проводит тестирование кандидатов на вакантную должность, чтобы установить степень соответствия. Также учитываются образование(количество лет обучения) и умственные способности(IQ)кандидата. На основании этих факторов можно определить насколько высокооплачиваемую должность может получить конкретный человек.

В качестве вводимых параметров использованы: IQ человека и количество лет обучения. Зависимость заработной платы от вводимых параметров следующая:

1)до 5000 руб. IQ до 100 и обучение менее 10 лет.

2)от5000 до 10000 руб. IQ до 100 и обучение свыше 10 лет.

3)от 10000 до 20000 руб. IQ от 100 до 120 и обучение до 15 лет.

4)свыше 20000 руб. IQ выше 120 или обучение свыше 15 лет.

Исходные данные.

Количество переменных:  2- параметры.

Количество классов:     4- размеры заработной платы.

Количество наблюдений: 70- соответствующие сочетания параметров.

Результат.

Тест3:

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

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

В качестве вводимых параметров использованы: этаж будущей квартиры, общая площадь и имеющиеся сумма денег для предстоящей покупки.

Исходные данные.

Количество переменных:  3- желаемые параметры.

Количество классов:     3- количество комнат.

Количество наблюдений: 40- соответствующие сочетания параметров.

Результат:

7. Вывод

По результатам проведённых исследований разработанного программного продукта следует отметить, что работает он корректно и удобен для использования при решении задач распознавания образов в пространстве вещественных переменных в рамках необходимой пользователю точности.

Список литературы.

Александров В.В. Горский Н.Д. «Алгоритмы и программы структурного метода обработки данных».