/* fun1.mar */
/* funzioni matematiche da math.h */

#include "math.h"
#include "stdio.h"

int     intero,*intero1;
double  arco,arco1,valore;
double  reale,reale1;

main()
{
clrscr();
intero=-100;
printf("%d\n",intero);
printf(" valore assoluto= %d\n",abs(intero));
getch();
arco=0.5;
arco1=1.0;
puts("arcocoseno di 0.5");
printf("%f\n",acos(arco));
puts("arcoseno di 0.5");
printf("%f\n",asin(arco));
puts("arcotangente di 0.5");
printf("%f\n",atan(arco));
puts("arcotangente rapporto 0.5/1.0 ");
valore=arco/arco1;
printf("%f\n",valore);
printf("%f\n",atan2(arco,arco1));
getch(); clrscr();
puts("coseno di 0.5");
printf("%f\n",cos(arco));
puts("coseno iperbolico di 0.5 ");
printf("%f\n",cosh(arco));
puts("seno di 0.5");
printf("%f\n",sin(arco));
puts("seno iperbolico di 0.5");
printf("%f\n",sinh(arco));
puts("tangente di 0.5");
printf("%f\n",tan(arco));
puts("tangente iperbolica di 0.5");
printf("%f\n",tanh(arco));
getch();clrscr();
reale=1.4;
puts("non minore di 1.4");
printf("%f\n",ceil(reale));
puts("non maggiore di 1.4 ");
printf("%f\n",floor(reale));
reale=1.0;
puts("esponenziale di e");
printf("%f\n",exp(reale));
reale=10.0;
puts("logaritmo naturale di 10");
printf("%f\n",log(reale));
puts("logaritmo decimale di 100");
reale=100.0;
printf("%f\n",log10(reale));
puts("radice quadrata di 100");
printf("%f\n",sqrt(reale));
getch();
puts("potenza ");
reale=10.0;
reale1=2.5;
printf("%f\n",pow(reale,reale1));
puts("rende parte intera e frazionaria");
reale1=modf(15.8,&intero1);
printf("%d %f\n",intero1,reale1);
puts("rende resto divisione ");
printf("%f\n",fmod(10.0,3.0));
puts("valore assoluto ");
printf("%f\n",fabs(-120.5));
getch();

}

-100
 valore assoluto= 100
arcocoseno di 0.5
1.047198
arcoseno di 0.5
0.523599
arcotangente di 0.5
0.463648
arcotangente rapporto 0.5/1.0
0.500000
0.463648


coseno di 0.5
0.877583
coseno iperbolico di 0.5
1.127626
seno di 0.5
0.479426
seno iperbolico di 0.5
0.521095
tangente di 0.5
0.546302
tangente iperbolica di 0.5
0.462117


non minore di 1.4
2.000000
non maggiore di 1.4
1.000000
esponenziale di e
2.718282
logaritmo naturale di 10
2.302585
logaritmo decimale di 100
2.000000
radice quadrata di 100
10.000000
potenza
316.227766
rende parte intera e frazionaria
0 0.800000
rende resto divisione
1.000000
valore assoluto
120.500000

ritorna