|
|
|
 |
 |
|
| Музыкальных проектов |
3605 |
|
| Музыкантов |
10435 |
|
|
|
|
|
|
Мнения о музыкантах
Страница: 1 (1 из 1)
Оставить свое мнение о других музыкантах вы можете на их страницах на портале. |
|
|
Crazy programmer | C++Town
| Дата: 01.12.2007
#include iostream.h
#include conio.h
#include math.h
main()
float x[100],a0[100],a1[100],a2[100],f[100],xzv[100],S[100],c[100],r[100];
int i;
float h=0.01;float pi=3.14;
xzv[0]=0.005;
for(i=1;i99;i++)
xzv[i]=xzv[i-1]+0.01;
for (i=0;i100;i++)
x[i]=i*h;
f[i]=cos(pi*x[i]*10);
a0[i]=f[i];
a1[0]=-10*pi*sin(0);
for(i=0;i99;i++)
a1[i+1]=(2*(f[i+1]-f[i]))/(x[i+1]-x[i])-a1[i];
a2[i]=(a1[i+1]-a1[i])/(2*(x[i+1]-x[i]));
a2[99]=(f[100]-f[99])/((x[100]-x[99])*(x[100]-x[99])) - a1[99]/(x[100]-x[99]);
for(i=0;i100;i++)
c[i]=cos(10*pi*xzv[i]);
S[i]=a0[i]+a1[i]*(xzv[i+1]-x[i])+a2[i]* (xzv[i+1]-x[i])*(xzv[i+1]-x[i]);
r[i]=fabs(c[i]-S[i]);
for(i=0;i100;i++)
coutr[i]endl;
getch();
в
новом окне |
|
|
|
