-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy pathSIMPSON.c
More file actions
76 lines (67 loc) · 1.39 KB
/
SIMPSON.c
File metadata and controls
76 lines (67 loc) · 1.39 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
//PRIMEIRA E SEGUNDA REGRA DE SIMPSON
#include<stdio.h>
#include<math.h>
#include<stdlib.h>
#define t 50
float primeira(float a,float e,int n){
int i;
float y[t],se,si,sp;
for(i=0;i<=n;i++){
//função
y[i]=1/a;
a=a+e;
}
se=y[0]+y[n];
sp=0;
si=0;
for(i=1;i<n;i++){
if((i%2)!=1) sp=sp+y[i];
if((i%2)==1) si=si+y[i];
}
return((e/3)*(se+4*si+2*sp));
}
float segunda(float a,float e,int n){
int i;
float y[t];
for(i=0;i<=n;i++){
//função
y[i]=1/a;
a=a+e;
}
return(((3/8)*e)*(y[0]+3*y[1]+3*y[2]+y[3]));
}
int main(){
int n,auxn;
float li,ls,h,e,integral,auxls;
//entrada de dados
printf("Digite o limite inferior:");
scanf("%f",&li);
printf("Digite o limite superior:");
scanf("%f",&ls);
printf("Digite o numero de intervalos:");
scanf("%d",&n);
if(n>=t){
printf("Esse so funciona com até %d intervalos!",t);
exit(0);
}
//para n ímpar
if((n%2)==1){
h=(ls-li)/n;
auxls=ls;
ls=h*3;
auxn=n;
n=3;
integral=segunda(li,h,n);
li=ls;
ls=auxls;
n=auxn-3;
integral=integral+primeira(li,h,n);
printf("I=%f",integral);
}
else{
h=(ls-li)/n;
integral=primeira(li,h,n);
printf("I=%f",integral);
}
return 0;
}