1.Найти параметры a,b.
уравнения
2.Имеются данные
x1,x2,x3...xN
y1,y2,y3...xN
3.Математическая формулировка данных
4.Алгоритм обработки
Процедура Кнопка19Нажатие(Элемент)
// Вставить содержимое обработчика.
Запрос = Новый Запрос;
Запрос.Текст = "
| SELECT
| x AS X1 ,
| y AS Y1
| FROM
|Справочник.Summa" ;
в=Запрос.Выполнить().Выбрать();
t= 0;
f= 0;
Пока в.Следующий()=1 Цикл
t= t+Log(в.Y1);
f= f+Log(в.Y1)*в.X1;
КонецЦикла;
Запрос = Новый Запрос;
Запрос.Текст = "
| SELECT
|SUM(x) AS r ,
| SUM(x*x) AS m ,
|SUM(x*x*y) AS d ,
|Count(x) AS N
| FROM
|Справочник.Summa" ;
в=Запрос.Выполнить().Выбрать();
Пока в.Следующий()=1 Цикл
КонецЦикла;
r1 = в.r ;
m1 = в.m ;
d1 = в.d ;
N1 = в.N ;
Сообщить("a=");
a= Exp((-r1*f+t*m1)/(N1*m1-r1*r1));
Сообщить(a);
Сообщить("b=");
b = Exp((-r1*t+f*N1)/(N1*m1-r1*r1));
Сообщить(b);
КонецПроцедуры
Предложениями и замечаниями обращаться по адресу- vova1001@yandex.ru
