/*code by ..::rasmo::... enjoy..*/
#include
#include
#define roz1 21


double sinhip (double x)
{
double w;
w=exp(x);
return 0.5*(w - 1/w);
}
double coship(double x)
{
double w;
w=exp(x);
return 0.5*(w + 1/w);
}

int main()
{
double tabx[roz1],tabc[roz1],tabs[roz1];
double n,a,b;
int i,y;

n=-2.2;
FILE*f;
f=fopen("s.dat","w");
y=1;
fprintf(f,"x\tsh(x)\tch(x)\n");
for(i=1;i<=roz1;i++)
{
n=n+0.2;
/*zapisywanie do tablic*/
tabx[i]=n;
tabs[i]=sinhip(n);
tabc[i]=coship(n);
/*drukowanie na ekran*/
printf("x%d= %3.1lf\tsh(x%d)= %f\tch(x%d)= %f\n\n",i,tabx[i],i,tabs[i],i,tabc[i]);
/*obliczanie stron tożsamości i ich drukowanie*/
a=sinhip(n+y);
b=(sinhip(n)*coship(y)+sinhip(y)*coship(n));
printf("sx(%3.1lf + %d)= %f\n",n,y,a);
printf("sh(%3.1lf)*ch(%d)+sh(%d)*ch(%3.1lf)= %lf\n",n,y,y,n,b);
fprintf(f,"%3.1lf\t%lf\t%lf\n",tabx[i],tabs[i],tabc[i]);
/*sprawdzanie tożsamości*/
if(a==b)
printf("tozsamosc prawdziwa\n\n");
else
printf("tozsamosc nieprawdziwa\n\n");
y++;
}
fclose(f);
getchar();
getchar();
}