# Quadratische Regression

## Problembeschreibung

******************************************
Dokumentnummer: D1502
******************************************
EIn Programm zur Durchführung der quadratischen Regression
ist zu erstellen.

## Problemlösung

EINGABE

x:read("Gib die x-Werte als Liste in [] ein");

y:read("Gib die y-Werte als Liste in [] ein");

VERARBEITUNG

n:length(x);

sx4:sum(x[i]^4,i,1,n);
sx3:sum(x[i]^3,i,1,n);
sx2:sum(x[i]^2,i,1,n);
sx:sum(x[i],i,1,n);
sx2y:sum(x[i]^2*y[i],i,1,n);
sxy:sum(x[i]*y[i],i,1,n);
sy:sum(y[i],i,1,n);

globalsolve:true;

g1:a*sx4+b*sx3+c*sx2 = sx2y;
g2:a*sx3+b*sx2+c*sx = sxy;
g3:a*sx2+b*sx+c*n = sy;

numer:true;
fpprec:8;

solve([g1,g2,g3],[a,b,c]);

AUSGABE

print("a =",a);    
print("b =",b);
print("c =",c);

a:floor(a*1000+0.5)/1000.0;
b:floor(b*1000+0.5)/1000.0;
c:floor(c*1000+0.5)/1000.0;

print("Quadratische Funktion")$
print("--------------------------------")$
print(concat("y = ",a,"x^2 + ",b,"x + ",c))$