3qt.c

#include <stdio.h>
#include <stdlib.h>
#include <math.h>
#include "3qt.h"

int menu(){
	int esc;
	
	printf(" ___________________________________________________________________\n");
	printf("|                                                                   |\n");
	printf("| 1-<Três Quartis>               2-<Média Populacional ou Amostral> |\n");
	printf("|                                                                   |\n");
	printf("| 3-<Média Ponderada>                4-<Distribuição de Frequência> |\n");
	printf("|                                                                   |\n");
	printf("| 5-<Variância e Desvio Padrão>         6-<Intervalos de Confiança> |\n");
	printf("|                                                                   |\n");
	printf("| 7-<Sair>                                                          |\n");
	printf("|___________________________________________________________________|\n");
	printf("\nDigite qual função do programa você deseja utilizar: ");
	scanf("%d",&esc);
	
	return esc;
}
int menuDF(){
	int esc;
	
	printf(" ________________________________________________________________________________\n");
	printf("|\t\t\t\t\t\t\t\t\t\t |\n");
	printf("| 1-Amplitude de Classes, Ponto Médio e Frequências de um conjunto desorganizado |\n");
	printf("|\t\t\t\t\t\t\t\t\t\t |\n");
	printf("|     2- Frequência Absoluta, Relativa e Acumulada de um conjunto organizado     |\n");
	printf("|________________________________________________________________________________|\n");
	printf("\nO que deseja calcular? ");
	scanf("%d",&esc);
	
	return esc;
}
int menuIDC(){
	int esc;
	
	printf(" ________________________________________________________________________________\n");
	printf("|\t\t\t\t\t\t\t\t\t\t |\n");
	printf("|             1-<Intervalo de confiança com desvio padrão conhecido>             |\n");
	printf("|\t\t\t\t\t\t\t\t\t\t |\n");
	printf("|           2-<Intervalo de Confiança com desvio padrão desconhecido>            |\n");
	printf("|\t\t\t\t\t\t\t\t\t\t |\n");
	printf("|                3-<Proporção>                   4-<Qui-Quadrado>                |\n");
	printf("|________________________________________________________________________________|\n");
	printf("\nO que deseja calcular? ");
	scanf("%d",&esc);
	
	return esc;
}
float* ORDP(float *vetor,float *peso,int n){
	int i,j;
    float temp;
    for(i=0;i<n;i++){
        for(j=i;j<n;j++){
            if(vetor[i]>vetor[j]){
                temp = peso[i];
                peso[i] = peso[j];
                peso[j] = temp;
             }
        }
	}
	return peso;
}
float* ORD(float *vetor, int tamanho){
    int i,j,cont;
    float temp;
    cont=0;
    for(i=0;i<tamanho;i++){
        for(j=i;j<tamanho;j++){
            if (vetor[i] > vetor[j]){
            	temp = vetor[i];
                vetor[i] = vetor[j];
                vetor[j] = temp;
                cont++;
             }
        }
	}
	printf("Checando se os dados estão em ordem crescente...\n");
	if(cont>0){
		printf("Não estão, reordenando...\n");
		printf("Dados reordenados.\n");
	}
	else{
		printf("Estão, não foi necessário reordenar.\n");
	}
	return vetor;
}
void OUTL(float *vet,float ol,int n){
	int i,cont;
	cont=0;
	for(i=0;i<n;i++){
		if(vet[i]<ol){
			cont++;
		}
	}
	if(cont>0){
		printf("São outliers à esquerda:\n");
		for(i=0;i<n;i++){
			if(vet[i]<ol){
				printf("<%.2f>",vet[i]);
			}
		}
	}
	else{
		printf("Não há outliers à esquerda.\n");
	}
}
void OUTR(float *vet,float or,int n){
	int i,cont;
	cont=0;
	for(i=0;i<n;i++){
		if(vet[i]>or){
			cont++;
		}
	}
	if(cont>0){
		printf("São outliers à direita:\n");
		for(i=0;i<n;i++){
			if(vet[i]>or){
				printf("<%.2f>",vet[i]);
			}
		}
	}
	else{
		printf("Não há outliers à direita.\n");
	}
}
float TRQR(int n){
	float res;
	res=n/4.0;
	return round(res);
}
float Q1(float *vet,int n){
	float res;
	res=vet[n/4];
	return res;
}
float Q2(float *vet,int n){
	float res;
	if(n%2==0){
		res=(vet[n/2]+vet[n/2-1])/2;
	}
	else{
		res=vet[n/2];
	}
	return res;
}
float Q3(float *vet,int n){
	float res;
	res=vet[(3*n)/4];
	return res;
}
float AIQ(float q1,float q3){
	float res;
	res=q3-q1;
	return res;
}
void MEDA(float *vet,int n){
	float res,res2,soma,mdn,mde;
	int i,j,cont,val;
	val=0;
	soma=0;
	for(i=0;i<n;i++){
		soma+=vet[i];
		cont=0;
		for(j=0;j<n;j++){
			if(vet[j]==vet[i]){
				++cont;
			}
		}
		if(cont>val){
			val=cont;
			mde=vet[i];
		}
	}
	res=soma/n;
	res2=soma/(n-1);
	if(n%2==0){
		mdn=(vet[n/2]+vet[n/2-1])/2;
	}
	else{
		mdn=vet[n/2];
	}
	printf("\nCaso o conjunto seja populacional:\n");
	printf("A média aritmética é: %.2f\n",res);
	printf("\nCaso o conjunto seja amostral:\n");
	printf("A média aritmética é: %.2f\n",res2);
	printf("\nEm todo caso, a mediana do conjunto de dados é: %.2f\n",mdn);
	if(val>1){
		printf("A moda do conjunto de dados é: %.2f\n",mde);
	}
	if(val<=1){
		printf("Não há moda nesse conjunto de dados.\n");
	}
}
void MEDP(float *vet,float *pes,int n){
	float res,soma,somap;
	int i;
	soma=0;
	somap=0;
	for(i=0;i<n;i++){
		soma+=(vet[i]*pes[i]);
		somap+=pes[i];
	}
	res=soma/somap;
	printf("A média ponderada do conjunto de dados analisado é: %.2f\n",res);
}
void VDP(float *vet,int n){
	float med,var,var2,soma1,soma2;
	int i;
	soma1=0;
	soma2=0;
	for(i=0;i<n;i++){
		soma1+=vet[i];
	}
	med=soma1/n;
	for(i=0;i<n;i++){
		if(vet[i]>med){
			soma2+=(vet[i]-med)*(vet[i]-med);
		}
		if(vet[i]<med){
			soma2+=(med-vet[i])*(med-vet[i]);
		}
	}
	var=soma2/n;
	var2=soma2/(n-1);
	printf("Caso o conjunto seja populacional, os resultados são os seguintes:\n");
	printf("A média populacional do conjunto de dados analisado é: %.2f\nA variância do conjunto de dados analisado é: %.2f\nO desvio padrão do conjunto de dados analisado é: %.2f\n",med,var,sqrtf(var));
	printf("Caso o conjunto seja amostral, os resultados são os seguintes:\n");
	printf("A média amostral do conjunto de dados analisado é: %.2f\nA variância do conjunto de dados analisado é: %.2f\nO desvio padrão do conjunto de dados analisado é: %.2f\n",med,var2,sqrtf(var2));
}
void DF(float *vet,float *pes,int n){
	int i;
	float fi,fr,Fri;
	fi=0,Fri=0;
	for(i=0;i<n;i++){
		fi+=pes[i];
		printf("| O valor do %dº dado é: %.2f |",i+1,vet[i]);
		printf(" A freq. absoluta do %dº dado é: %.2f |\n",i+1,pes[i]);
	}
	printf("\n");
	for(i=0;i<n;i++){
		fr=0;
		fr+=(pes[i]/fi)*100;
		printf("A freq. relativa do %dº dado é de %.2f%%\n",i+1,fr);
	}
	for(i=0;i<n;i++){
		Fri+=(pes[i]/fi)*100;
		printf("A freq. relativa acumulada do %dº dado é de %.2f%%\n",i+1,Fri);
	}
	printf("A freq. absoluta de todo o conjunto de dados analisado é: %.2f\n",fi);
}
float AC(float *vet,int n,int cla){
	float res,res2;
	printf("O limite inferior do conjunto de dados analisado é: %.2f\nO limite superior do conjunto de dados analisado é: %.2f\n",vet[0],vet[n-1]);
	res2=(vet[n-1]-vet[0])/cla;
	printf("A amplitude de classes do conjunto de dados analisado é: %.2f\n",res2);
	res=floor(res2);
	
	return res;
}
void PM(float *vet,float ac,int n,int c){
	int i,j,cont,*freq;
	float *li,*ls,*res,freq1,freq2;
	
	li = (float*)malloc(sizeof(int)*c);
	ls = (float*)malloc(sizeof(int)*c);
	res = (float*)malloc(sizeof(int)*c);
	freq = (int*)malloc(sizeof(int)*c);
	
	printf(" _______________________________________________________\n");
	printf("|                                                       |\n");
	printf("| Arredondando a amplitude de classe para baixo, temos: |\n");
	printf("|_______________________________________________________|\n\n");
	freq1=0;
	for(i=0;i<c;i++){
		cont=0;
		if(i==0){
			li[i]=vet[i];
		}
		else{
			li[i]=li[i-1]+ac;
		}
		printf("O limite inferior da %dª classe é: %.1f",i+1,li[i]);
		if(i==0){
			ls[i]=li[i]+ac-1;
		}
		else{
			ls[i]=ls[i-1]+ac;
		}
		printf("\t|\tO limite superior da %dª classe é: %.1f\n",i+1,ls[i]);
		
		res[i]=(li[i]+ls[i])/2;
		printf("O ponto médio da %dª classe é: %.2f",i+1,res[i]);
		for(j=0;j<n;j++){
			if(vet[j]>=li[i] && vet[j]<=ls[i]){
				cont++;
			}
		}
		freq[i]=cont;
		printf("\t|\tA frequência dos valores contidos na %dª classe é: %d\n\n",i+1,freq[i]);
		freq1+=freq[i];
	}
	freq2=0;
	for(i=0;i<c;i++){
		printf("A frequência relativa da %dª classe é de %.2f%%\n",i+1,(freq[i]/freq1)*100.0);
	}
	for(i=0;i<c;i++){
		freq2+=(freq[i]/freq1)*100;
		printf("A frequência acumulada da %dª classe é de %.2f%%\n",i+1,freq2);
	}
	
	printf("\n ______________________________________________________\n");
	printf("|                                                      |\n");
	printf("| Arredondando a amplitude de classe para cima, temos: |\n");
	printf("|______________________________________________________|\n\n");
	freq1=0;
	ac+=1;
	for(i=0;i<c;i++){
		cont=0;
		if(i==0){
			li[i]=vet[i];
		}
		else{
			li[i]=li[i-1]+ac;
		}
		printf("O limite inferior da %dª classe é: %.1f",i+1,li[i]);
		if(i==0){
			ls[i]=li[i]+ac-1;
		}
		else{
			ls[i]=ls[i-1]+ac;
		}
		printf("\t|\tO limite superior da %dª classe é: %.1f\n",i+1,ls[i]);
		
		res[i]=(li[i]+ls[i])/2;
		printf("O ponto médio da %dª classe é: %.2f",i+1,res[i]);
		for(j=0;j<n;j++){
			if(vet[j]>=li[i] && vet[j]<=ls[i]){
				cont++;
			}
		}
		freq[i]=cont;
		printf("\t|\tA frequência dos valores contidos na %dª classe é: %d\n\n",i+1,freq[i]);
		freq1+=freq[i];
	}
	freq2=0;
	for(i=0;i<c;i++){
		printf("A frequência relativa da %dª classe é de %.2f%%\n",i+1,(freq[i]/freq1)*100.0);
	}
	for(i=0;i<c;i++){
		freq2+=(freq[i]/freq1)*100;
		printf("A frequência acumulada da %dª classe é de %.2f%%\n",i+1,freq2);
	}
}
void IDCC(int n){
	float x,e,zc,dp,c,soma=0,n1;
	float* vet;
	int i,n2,esc1,esc2;
	if(n==0)
		printf("Esse programa analisará um conjunto de dados e retornará a sua quantidade de membros.\n");
	if(n!=0){
		printf("Esse programa analisará um conjunto de dados e retornará o intervalo de confiança do mesmo.\n");
		do{
			printf("Você já sabe o valor da média desse conjunto de dados(1-Sim / 2-Não)? ");
			scanf("%d",&esc1);
			if(esc1<1 || esc1>2)
				printf("<Valor inválido, por favor digite um valor entre 1 e 2>\n");
		}while(esc1<1 || esc1>2);
		if(esc1==2){
			printf(" ________________________________________________________________________________\n");
			printf("|\t\t\t\t\t\t\t\t\t\t |\n");
			printf("|                       1-<Digitar os valores do conjunto>                       |\n");
			printf("|\t\t\t\t\t\t\t\t\t\t |\n");
			printf("|                           2-<Buscar o erro amostral>                           |\n");
			printf("|________________________________________________________________________________|\n");
			printf("\nO que deseja? ");
			scanf("%d",&esc2);
			if(esc2==1){
				vet = (float*)malloc(sizeof(int)*n);
				for(i=0;i<n;i++){
					printf("Digite o %dº dado: ",i+1);
					scanf("%f",&vet[i]);
				}
			}
		}
	}
	
	printf("Qual o desvio padrão populacional desse conjunto de dados? ");
	scanf("%f",&dp);
	
	do{
		printf("Qual o nível de confiança para o intervalo desse conjunto de dados(ex: 80%%, 99%% etc - Digite sem a %%)? ");
		scanf("%f",&c);
		if(c<75.0 || c>99.9)
			printf("<Valor de 'c' inválido, favor digitar um valor entre 75%% e 99.9%%>\n");
	}while(c<75.0 || c>99.9);
	if(c==75)
		zc=1.15;
	if(c==80)
		zc=1.28;
	if(c==85)
		zc=1.44;
	if(c==90)
		zc=1.645;
	if(c==95)
		zc=1.96;
	if(c==97)
		zc=2.17;
	if(c==97.5)
		zc=2.242;
	if(c==98)
		zc=2.33;
	if(c==99)
		zc=2.58;
	if(c==99.8)
		zc=3.08;
	if(c==99.9)
		zc=3.27;
	
	if(n==0){
		printf("Qual a margem de erro do conjunto de dados? ");
		scanf("%f",&e);
		n1=(zc*dp/e)*(zc*dp/e);
		n2=ceilf(n1);
		printf("\nO conjunto de dados em questão possui %d dados.\n",n2);
	}
	else
		e=zc*dp/sqrtf(n);
	
	if(esc1==1){
		printf("Qual o valor da média amostral desse conjunto de dados? ");
		scanf("%f",&x);
	}
	if(esc1==2){
		for(i=0;i<n;i++){
			soma+=vet[i];
		}
		x=soma/n;
	}
	
	if(n!=0 && esc2!=2){
		printf("\nSabendo que:\nCom uma confiança de '%.1f%%' o z-crítico é igual a '%.3f'\nCom um desvio padrão igual a: '%f', temos que:\n",c,zc,dp);
		printf("A margem de erro é: '%f'\n& o intervalo de confiança é: |'%f' < u < '%f'|\n",e,x-e,x+e);
	}
	
	if(esc2==2)
		printf("\nO erro amostral é: '%f'\n",e);
}
void IDCD(int n){
	float tc,x,s,e,soma1=0,soma2=0,gl=(n-1);
	float* vet;
	int i,c,esc1,esc2;
	
	printf("Esse programa analisará um conjunto de dados e retornará o intervalo de confiança e/ou o t-crítico do mesmo.\n");
	
	do{
		printf(" ________________________________________________________________________________\n");
		printf("|\t\t\t\t\t\t\t\t\t\t |\n");
		printf("|                 1-<Intervalo de Confiança e/ou margem de erro>                 |\n");
		printf("|\t\t\t\t\t\t\t\t\t\t |\n");
		printf("|                        2-<Somente o valor do t-crítico>                        |\n");
		printf("|________________________________________________________________________________|\n");
		printf("\nO que está buscando? ");
		scanf("%d",&esc1);
		if(esc1==1){
			do{
				printf("Qual o nível de confiança para o intervalo desse conjunto de dados(ex: 90%%, 99%% etc - Digite sem a %%)? ");
				scanf("%d",&c);
				if(c<90 || c>99)
					printf("<Valor de 'c' inválido, favor digitar um valor que seja igual a 90%%, 95%%, 98%% ou 99%%>\n");
			}while(c<90 || c>99);
			if(c==90){
				if(gl==4)
					tc=2.132;
				if(gl==5)
					tc=2.015;
				if(gl==6)
					tc=1.943;
				if(gl==7)
					tc=1.895;
				if(gl==8)
					tc=1.860;
				if(gl==9)
					tc=1.833;
				if(gl==11)
					tc=1.796;
				if(gl==12)
					tc=1.782;
				if(gl==13)
					tc=1.771;
				if(gl==14)
					tc=1.761;
				if(gl==15)
					tc=1.753;
				if(gl==17)
					tc=1.740;
				if(gl==18)
					tc=1.734;
				if(gl==19)
					tc=1.729;
				if(gl==34)
					tc=1.691;
				if(gl==39)
					tc=1.685;
				if(gl>=43 && gl<=47)
					tc=1.679;
				if(gl>=48 && gl<=52)
					tc=1.676;
			}
			if(c==95){
				if(gl==4)
					tc=2.776;
				if(gl==5)
					tc=2.571;
				if(gl==6)
					tc=2.447;
				if(gl==7)
					tc=2.365;
				if(gl==8)
					tc=2.306;
				if(gl==9)
					tc=2.262;
				if(gl==11)
					tc=2.201;
				if(gl==12)
					tc=2.179;
				if(gl==13)
					tc=2.160;
				if(gl==14)
					tc=2.145;
				if(gl==15)
					tc=2.131;
				if(gl==17)
					tc=2.110;
				if(gl==18)
					tc=2.101;
				if(gl==19)
					tc=2.093;
				if(gl==32)
					tc=2.037;
				if(gl==34)
					tc=2.032;
				if(gl==39)
					tc=2.023;
				if(gl>=43 && gl<=47)
					tc=2.014;
				if(gl>=48 && gl<=52)
					tc=2.009;
			}
			if(c==98){
				if(gl==4)
					tc=3.747;
				if(gl==5)
					tc=3.365;
				if(gl==6)
					tc=3.143;
				if(gl==7)
					tc=2.998;
				if(gl==8)
					tc=2.896;
				if(gl==9)
					tc=2.821;
				if(gl==11)
					tc=2.718;
				if(gl==12)
					tc=2.681;
				if(gl==13)
					tc=2.650;
				if(gl==14)
					tc=2.624;
				if(gl==15)
					tc=2.602;
				if(gl==17)
					tc=2.567;
				if(gl==18)
					tc=2.552;
				if(gl==19)
					tc=2.539;
				if(gl==34)
					tc=2.441;
				if(gl==39)
					tc=2.426;
				if(gl>=43 && gl<=47)
					tc=2.412;
				if(gl>=48 && gl<=52)
					tc=2.403;
			}
			if(c==99){
				if(gl==4)
					tc=4.604;
				if(gl==5)
					tc=4.032;
				if(gl==6)
					tc=3.707;
				if(gl==7)
					tc=3.499;
				if(gl==8)
					tc=3.355;
				if(gl==9)
					tc=3.250;
				if(gl==11)
					tc=3.106;
				if(gl==12)
					tc=3.055;
				if(gl==13)
					tc=3.012;
				if(gl==14)
					tc=2.977;
				if(gl==15)
					tc=2.947;
				if(gl==17)
					tc=2.898;
				if(gl==18)
					tc=2.878;
				if(gl==19)
					tc=2.861;
				if(gl==34)
					tc=2.728;
				if(gl==39)
					tc=2.708;
				if(gl>=43 && gl<=47)
					tc=2.690;
				if(gl>=48 && gl<=52)
					tc=2.678;
			}
			
			printf("Qual o valor do desvio padrão amostral(Caso não saiba, digite 0)? ");
			scanf("%f",&s);
			if(s==0){
				vet = (float*)malloc(sizeof(int)*n);
				for(i=0;i<n;i++){
					printf("Digite o %dº dado: ",i+1);
					scanf("%f",&vet[i]);
					soma1+=vet[i];
				}
				x=soma1/n;
				for(i=0;i<n;i++)
					soma2+=((vet[i]-x)*(vet[i]-x));
			}
			if(s<0 || s>0){
				do{
					printf("Você sabe o valor da média amostral(1-Sim / 2-Não)? ");
					scanf("%d",&esc2);
					if(esc2==1){
						printf("Digite o valor da média: ");
						scanf("%f",&x);
					}
					if(esc2==2){
						
					}
					if(esc2<1 || esc2>2)
						printf("<Valor inválido, por favor digite um valor entre 1 e 2>\n");
				}while(esc2<1 || esc2>2);
			}
			
			if(esc2==1 || s==0){
				if(s==0)
					s=sqrtf(soma2/gl);
				e=(tc*s)/sqrtf(n);
				printf("\nSabendo que:\nCom uma confiança de '%d%%' o t-crítico é igual a '%.3f'\n& com uma estimativa pontual igual a: '%f', temos que:\n",c,tc,x);
				printf("O desvio padrão amostral é igual a: '%f'\nA margem de erro é: '%f'\n& o intervalo de confiança é: |'%f' < u < '%f'|\n",s,e,x-e,x+e);
			}
			else{
				e=(tc*s)/sqrtf(n);
				printf("\nSabendo que c é igual a '%d%%', t-crítico é igual a '%.3f' e o desvio padrão amostral é igual a: '%f', temos que:\n",c,tc,s);
				printf("O valor da margem de erro é: '%f'\n",e);
			}
		}
		if(esc1==2){
			do{
				printf("Qual o nível de confiança para o intervalo desse conjunto de dados(ex: 90%%, 99%% etc - Digite sem a %%)? ");
				scanf("%d",&c);
				if(c<90 || c>99)
					printf("<Valor de 'c' inválido, favor digitar um valor que seja igual a 90%%, 95%%, 98%% ou 99%%>\n");
			}while(c<90 || c>99);
			if(c==90){
				if(gl==4)
					tc=2.132;
				if(gl==5)
					tc=2.015;
				if(gl==6)
					tc=1.943;
				if(gl==7)
					tc=1.895;
				if(gl==8)
					tc=1.860;
				if(gl==9)
					tc=1.833;
				if(gl==11)
					tc=1.796;
				if(gl==12)
					tc=1.782;
				if(gl==13)
					tc=1.771;
				if(gl==14)
					tc=1.761;
				if(gl==15)
					tc=1.753;
				if(gl==17)
					tc=1.740;
				if(gl==18)
					tc=1.734;
				if(gl==19)
					tc=1.729;
				if(gl==34)
					tc=1.691;
				if(gl==39)
					tc=1.685;
				if(gl>=43 && gl<=47)
					tc=1.679;
				if(gl>=48 && gl<=52)
					tc=1.676;
			}
			if(c==95){
				if(gl==4)
					tc=2.776;
				if(gl==5)
					tc=2.571;
				if(gl==6)
					tc=2.447;
				if(gl==7)
					tc=2.365;
				if(gl==8)
					tc=2.306;
				if(gl==9)
					tc=2.262;
				if(gl==11)
					tc=2.201;
				if(gl==12)
					tc=2.179;
				if(gl==13)
					tc=2.160;
				if(gl==14)
					tc=2.145;
				if(gl==15)
					tc=2.131;
				if(gl==17)
					tc=2.110;
				if(gl==18)
					tc=2.101;
				if(gl==19)
					tc=2.093;
				if(gl==32)
					tc=2.037;
				if(gl==34)
					tc=2.032;
				if(gl==39)
					tc=2.023;
				if(gl>=43 && gl<=47)
					tc=2.014;
				if(gl>=48 && gl<=52)
					tc=2.009;
			}
			if(c==98){
				if(gl==4)
					tc=3.747;
				if(gl==5)
					tc=3.365;
				if(gl==6)
					tc=3.143;
				if(gl==7)
					tc=2.998;
				if(gl==8)
					tc=2.896;
				if(gl==9)
					tc=2.821;
				if(gl==11)
					tc=2.718;
				if(gl==12)
					tc=2.681;
				if(gl==13)
					tc=2.650;
				if(gl==14)
					tc=2.624;
				if(gl==15)
					tc=2.602;
				if(gl==17)
					tc=2.567;
				if(gl==18)
					tc=2.552;
				if(gl==19)
					tc=2.539;
				if(gl==34)
					tc=2.441;
				if(gl==39)
					tc=2.426;
				if(gl>=43 && gl<=47)
					tc=2.412;
				if(gl>=48 && gl<=52)
					tc=2.403;
			}
			if(c==99){
				if(gl==4)
					tc=4.604;
				if(gl==5)
					tc=4.032;
				if(gl==6)
					tc=3.707;
				if(gl==7)
					tc=3.499;
				if(gl==8)
					tc=3.355;
				if(gl==9)
					tc=3.250;
				if(gl==11)
					tc=3.106;
				if(gl==12)
					tc=3.055;
				if(gl==13)
					tc=3.012;
				if(gl==14)
					tc=2.977;
				if(gl==15)
					tc=2.947;
				if(gl==17)
					tc=2.898;
				if(gl==18)
					tc=2.878;
				if(gl==19)
					tc=2.861;
				if(gl==34)
					tc=2.728;
				if(gl==39)
					tc=2.708;
				if(gl>=43 && gl<=47)
					tc=2.690;
				if(gl>=48 && gl<=52)
					tc=2.678;
			}
			
			printf("O valor do t-crítico é: '%.3f'\n",tc);
			}
		if(esc1<1 || esc1>2)
				printf("<Valor inválido, por favor digite um valor entre 1 e 2>\n");
	}while(esc1<1 || esc1>2);
}
void PPR(int n){
	float x,p,q,c,zc,e,e2,n1,p1,p2,x1;
	int n2;
	
	if(n==0){
		printf("Esse programa informará a quantidade de um conjunto de dados por meio de seus dados proporcionais.\n\n");
		
		do{
			printf("Informe o valor de 'p^' desse conjunto de dados (caso não saiba, digite 0,5): ");
			scanf("%f",&p);
			q = 1.0-p;
			if(p<0 || p>1)
				printf("<Valor de 'p^' inválido, favor digitar um valor entre 0 e 1>\n");
		}while(p<0 || p>1);
		printf("Informe o máximo que a estimativa populacional pode distar da proporção populacional (digite sem a %%): ");
		scanf("%f",&e2);
		e=e2/100;
		do{
			printf("Informe o valor de 'c' desse conjunto de dados (digite sem a %%): ");
			scanf("%f",&c);
			if(c<75.0 || c>99.9)
				printf("<Valor de 'c' inválido, favor digitar um valor entre 75%% e 99.9%%>\n");
		}while(c<75.0 || c>99.9);
		if(c==75)
			zc=1.15;
		if(c==80)
			zc=1.28;
		if(c==85)
			zc=1.44;
		if(c==90)
			zc=1.645;
		if(c==95)
			zc=1.96;
		if(c==97)
			zc=2.17;
		if(c==97.5)
			zc=2.242;
		if(c==98)
			zc=2.33;
		if(c==99)
			zc=2.58;
		if(c==99.8)
			zc=3.08;
		if(c==99.9)
			zc=3.27;
		
		n1 = p*q*((zc/e)*(zc/e));
		n2 = ceilf(n1);
		
		printf("A quantidade mínima de dados desse conjunto é: '%d'\n",n2);
	}
	if(n!=0){
		printf("Esse programa informará a proporção de um subconjunto de dados em relação ao seu conjunto total de dados.\n\n");
		
		printf("Informe a quantidade de dados do subconjunto (caso não saiba, digite 0): ");
		scanf("%f",&x);
		if(x==0){
			do{
				printf("Qual a probabilidade relacionada à 'n' (digite sem a %%)? ");
				scanf("%f",&p1);
				if(p1<0 || p1>100)
					printf("<Valor de inválido, favor digitar um valor entre 0%% e 100%%>\n");
			}while(p1<0 || p1>100);
			p2 = p1/100.0;
			x1 = n*p2;
			x = ceilf(x1);
		}
		do{
			printf("Informe a confiança que deseja para o intervalo de confiança: ");
			scanf("%f",&c);
			if(c<75.0 || c>99.9)
				printf("<Valor de 'c' inválido, favor digitar um valor entre 75%% e 99,9%%>\n");
		}while(c<75.0 || c>99.9);
		if(c==75)
			zc=1.15;
		if(c==80)
			zc=1.28;
		if(c==85)
			zc=1.44;
		if(c==90)
			zc=1.645;
		if(c==95)
			zc=1.96;
		if(c==97)
			zc=2.17;
		if(c==97.5)
			zc=2.242;
		if(c==98)
			zc=2.33;
		if(c==99)
			zc=2.58;
		if(c==99.8)
			zc=3.08;
		if(c==99.9)
			zc=3.27;
		
		p = x/n;
		q = 1.0-p;
		e = (zc*sqrtf(p*q))/n;
		
		printf("Sabendo que:\nA quantidade (n) de dados do conjunto é '%d'\nA quantidade de dados (x) do subconjunto é '%.0f'\n",n,x);
		printf("& o nível de confiança é de '%.2f%%', temos que:\n",c);
		printf("A margem de erro é '%f' e o intervalo de confiança é de: | '%f' < u < '%f' |\n",e,p-e,p+e);
	}
}
void QUIQ(int n){
	float s,c,c2,soma1,soma2,xr,x,xl,xr2=0,xl2=0,ivl,ivr,idl,idr;
	float* vet;
	int i,esc,gl=(n-1);
	
	do{
		printf(" ________________________________________________________________________________\n");
		printf("|\t\t\t\t\t\t\t\t\t\t |\n");
		printf("|                           1-<Intervalo de Confiança>                           |\n");
		printf("|\t\t\t\t\t\t\t\t\t\t |\n");
		printf("|                         2-<Somente o valor do Xr e Xl>                         |\n");
		printf("|________________________________________________________________________________|\n");
		printf("\nO que está buscando? ");
		scanf("%d",&esc);
		if(c<0 || c>1)
		  	printf("<Valor inválido, favor digitar um valor entre 1 e 2>\n");
	}while(esc<1 || esc>2);
	system("CLS");
	
	if(esc==1){
		printf("Esse programa informará o intervalo de confiança da variância e do desvio padrão de um conjunto de dados.\n\n");
		
		printf("Qual o valor do desvio padrão amostral(Caso não saiba, digite 0)? ");
		scanf("%f",&s);
		if(s==0){
			vet = (float*)malloc(sizeof(int)*n);
			for(i=0;i<n;i++){
				printf("Digite o %dº dado: ",i+1);
				scanf("%f",&vet[i]);
				soma1+=vet[i];
			}
			x=soma1/n;
			for(i=0;i<n;i++)
				soma2+=((vet[i]-x)*(vet[i]-x));
			s=sqrtf(soma2/gl);
		}
		
		do{
			printf("Qual o valor de confiança que deseja utilizar? ");
			scanf("%f",&c);
			if(c<0 || c>100)
		  		printf("<Valor de 'c' inválido, favor digitar um valor entre 0%% e 100%%>\n");
		}while(c<0 || c>100);
		c2 = c/100;
		xr = (1.0-c2)/2.0;
		xl = (1.0+c2)/2.0;
		printf("xr : %f\nxl: %f\n",xr,xl);
		if(xr>=0.004 && xr<=0.006){
			if(gl==6)
				xr2=18.548;
			if(gl==7)
				xr2=20.278;
			if(gl==13)
				xr2=29.819;
			if(gl==14)
				xr2=31.319;
			if(gl==17)
				xr2=35.718;
			if(gl==29)
				xr2=52.336;
		}
		if(xr>=0.009 && xr<=0.11){
			if(gl==25)
				xr2=44.314;
			if(gl==40)
				xr2=63.619;
		}
		if(xr>=0.024 && xr<=0.026){
			if(gl==7)
				xr2=16.013;
			if(gl==14)
				xr2=26.119;
			if(gl==16)
				xr2=28.845;
			if(gl==18)
				xr2=31.526;
			if(gl==19)
				xr2=32.852;
			if(gl==29)
				xr2=45.722;
		}
		if(xr>=0.049 && xr<=0.051){
			if(gl==7)
				xr2=14.067;
			if(gl==14)
				xr2=23.685;
			if(gl==17)
				xr2=27.587;
		}
		if(xr>=0.09 && xr<=0.11){
			if(gl==50)
				xr2=76.154;
			if(gl==10)
				xr2=15.987;
		}
		if(xr>=0.79 && xr<=0.81){
			if(gl==50)
				xr2=41.449;
			if(gl==10)
				xr2=6.179;
		}
		if(xr>=0.89 && xr<=0.91){
			if(gl==7)
				xr2=2.833;
			if(gl==10)
				xr2=4.865;
			if(gl==14)
				xr2=7.790;
			if(gl==17)
				xr2=10.085;
			if(gl==50)
				xr2=37.689;
		}
		if(xr>=0.949 && xr<=0.951){
			if(gl==7)
				xr2=2.167;
			if(gl==14)
				xr2=6.571;
			if(gl==16)
				xr2=7.961;
			if(gl==17)
				xr2=8.672;
			if(gl==18)
				xr2=9.390;
			if(gl==19)
				xr2=10.117;
			if(gl==29)
				xr2=17.708;
		}
		if(xr>=0.974 && xr<=0.976){
			if(gl==14)
				xr2=5.629;
			if(gl==16)
				xr2=6.908;
			if(gl==18)
				xr2=8.231;
			if(gl==19)
				xr2=8.907;
			if(gl==29)
				xr2=16.047;
		}
		if(xr>=0.979 && xr<=0.981){
			if(gl==25)
				xr2=12.697;
			if(gl==40)
				xr2=23.838;
		}
		if(xr>=0.989 && xr<=0.991){
			if(gl==6)
				xr2=0.872;
			if(gl==13)
				xr2=4.107;
			if(gl==14)
				xr2=4.660;
			if(gl==17)
				xr2=6.408;
			if(gl==25)
				xr2=11.524;
			if(gl==29)
				xr2=14.256;
			if(gl==40)
				xr2=22.164;
		}
		if(xr>=0.994 && xr<=0.996){
			if(gl==6)
				xr2=0.676;
			if(gl==13)
				xr2=3.565;
			if(gl==14)
				xr2=4.075;
			if(gl==17)
				xr2=5.697;
			if(gl==29)
				xr2=13.121;
		}
		if(xl>=0.004 && xl<=0.006){
			if(gl==6)
				xl2=18.548;
			if(gl==7)
				xl2=20.278;
			if(gl==13)
				xl2=29.819;
			if(gl==14)
				xl2=31.319;
			if(gl==17)
				xl2=35.718;
			if(gl==29)
				xl2=52.336;
		}
		if(xl>=0.009 && xl<=0.011){
			if(gl==25)
				xl2=44.314;
			if(gl==40)
				xl2=63.619;
		}
		if(xl>=0.024 && xl<=0.026){
			if(gl==7)
				xl2=16.013;
			if(gl==14)
				xl2=26.119;
			if(gl==16)
				xl2=28.845;
			if(gl==18)
				xl2=31.526;
			if(gl==19)
				xl2=32.852;
			if(gl==29)
				xl2=45.722;
		}
		if(xl>=0.049 && xl<=0.51){
			if(gl==7)
				xl2=14.067;
			if(gl==14)
				xl2=23.685;
			if(gl==17)
				xl2=27.587;
		}
		if(xl>=0.09 && xl<=0.11){
			if(gl==50)
				xl2=76.154;
			if(gl==10)
				xl2=23.209;
		}
		if(xl>=0.79 && xl<=0.81){
			if(gl==50)
				xl2=41.449;
			if(gl==10)
				xl2=6.179;
		}
		if(xl>=0.89 && xl<=0.91){
			if(gl==7)
				xl2=2.833;
			if(gl==10)
				xl2=4.865;
			if(gl==14)
				xl2=7.790;
			if(gl==17)
				xl2=10.085;
			if(gl==50)
				xl2=37.689;
		}
		if(xl>=0.949 && xl<=0.951){
			if(gl==7)
				xl2=2.167;
			if(gl==14)
				xl2=6.571;
			if(gl==16)
				xl2=7.961;
			if(gl==17)
				xl2=8.672;
			if(gl==18)
				xl2=9.390;
			if(gl==19)
				xl2=10.117;
			if(gl==29)
				xl2=17.708;
		}
		if(xl>=0.974 && xl<=0.976){
			if(gl==14)
				xl2=5.629;
			if(gl==16)
				xl2=6.908;
			if(gl==18)
				xl2=8.231;
			if(gl==19)
				xl2=8.907;
			if(gl==29)
				xl2=16.047;
		}
		if(xl>=0.979 && xl<=0.981){
			if(gl==25)
				xl2=12.697;
			if(gl==40)
				xl2=23.838;
		}
		if(xl>=0.989 && xl<=0.991){
			if(gl==6)
				xl2=0.872;
			if(gl==13)
				xl2=4.107;
			if(gl==14)
				xl2=4.660;
			if(gl==17)
				xl2=6.408;
			if(gl==25)
				xl2=11.524;
			if(gl==29)
				xl2=14.256;
			if(gl==40)
				xl2=22.164;
		}
		if(xl>=0.994 && xl<=0.996){
			if(gl==6)
				xl2=0.676;
			if(gl==13)
				xl2=3.565;
			if(gl==14)
				xl2=4.075;
			if(gl==17)
				xl2=5.697;
			if(gl==29)
				xl2=13.121;
		}
		
		ivl = (gl*(s*s))/xr2;
		ivr = (gl*(s*s))/xl2;
		idl = sqrtf((gl*(s*s))/xr2);
		idr = sqrtf((gl*(s*s))/xl2);
		
		printf("Sabendo que:\nA quantidade (n) de dados do conjunto é '%d'\nO desvio amostral (s) do conjunto é '%f'\n",n,s);
		printf("& o nível de confiança é de '%.2f%%', temos que:\n",c);
		printf("O intervalo de confiança da variância é: | '%f' < u < '%f' |\n",ivl,ivr);
		printf("O intervalo de confiança do desvio padrão é: | '%f' < u < '%f' |\n",idl,idr);
	}
	if(esc==2){
		printf("Esse programa informará o valor do Xr e Xl.\n\n");
		
		do{
			printf("Qual o valor de confiança que deseja utilizar? ");
			scanf("%f",&c);
			if(c<0 || c>100)
			  		printf("<Valor de 'c' inválido, favor digitar um valor entre 0%% e 100%%>\n");
		}while(c<0 || c>100);
		c2 = c/100.0;
		xr = (1.0-c2)/2.0;
		xl = (1.0+c2)/2.0;
		//printf("xr : %f\nxl: %f\n",xr,xl);
		if(xr>=0.004 && xr<=0.006){
			if(gl==6)
				xr2=18.548;
			if(gl==7)
				xr2=20.278;
			if(gl==13)
				xr2=29.819;
			if(gl==14)
				xr2=31.319;
			if(gl==17)
				xr2=35.718;
			if(gl==29)
				xr2=52.336;
		}
		if(xr>=0.009 && xr<=0.11){
			if(gl==25)
				xr2=44.314;
			if(gl==40)
				xr2=63.619;
		}
		if(xr>=0.024 && xr<=0.026){
			if(gl==7)
				xr2=16.013;
			if(gl==14)
				xr2=26.119;
			if(gl==16)
				xr2=28.845;
			if(gl==18)
				xr2=31.526;
			if(gl==19)
				xr2=32.852;
			if(gl==29)
				xr2=45.722;
		}
		if(xr>=0.049 && xr<=0.051){
			if(gl==7)
				xr2=14.067;
			if(gl==14)
				xr2=23.685;
			if(gl==17)
				xr2=27.587;
		}
		if(xr>=0.09 && xr<=0.11){
			if(gl==50)
				xr2=76.154;
			if(gl==10)
				xr2=15.987;
		}
		if(xr>=0.79 && xr<=0.81){
			if(gl==50)
				xr2=41.449;
			if(gl==10)
				xr2=6.179;
		}
		if(xr>=0.89 && xr<=0.91){
			if(gl==7)
				xr2=2.833;
			if(gl==10)
				xr2=4.865;
			if(gl==14)
				xr2=7.790;
			if(gl==17)
				xr2=10.085;
			if(gl==50)
				xr2=37.689;
		}
		if(xr>=0.949 && xr<=0.951){
			if(gl==7)
				xr2=2.167;
			if(gl==14)
				xr2=6.571;
			if(gl==16)
				xr2=7.961;
			if(gl==17)
				xr2=8.672;
			if(gl==18)
				xr2=9.390;
			if(gl==19)
				xr2=10.117;
			if(gl==29)
				xr2=17.708;
		}
		if(xr>=0.974 && xr<=0.976){
			if(gl==14)
				xr2=5.629;
			if(gl==16)
				xr2=6.908;
			if(gl==18)
				xr2=8.231;
			if(gl==19)
				xr2=8.907;
			if(gl==29)
				xr2=16.047;
		}
		if(xr>=0.979 && xr<=0.981){
			if(gl==25)
				xr2=12.697;
			if(gl==40)
				xr2=23.838;
		}
		if(xr>=0.989 && xr<=0.991){
			if(gl==6)
				xr2=0.872;
			if(gl==13)
				xr2=4.107;
			if(gl==14)
				xr2=4.660;
			if(gl==17)
				xr2=6.408;
			if(gl==25)
				xr2=11.524;
			if(gl==29)
				xr2=14.256;
			if(gl==40)
				xr2=22.164;
		}
		if(xr>=0.994 && xr<=0.996){
			if(gl==6)
				xr2=0.676;
			if(gl==13)
				xr2=3.565;
			if(gl==14)
				xr2=4.075;
			if(gl==17)
				xr2=5.697;
			if(gl==29)
				xr2=13.121;
		}
		if(xl>=0.004 && xl<=0.006){
			if(gl==6)
				xl2=18.548;
			if(gl==7)
				xl2=20.278;
			if(gl==13)
				xl2=29.819;
			if(gl==14)
				xl2=31.319;
			if(gl==17)
				xl2=35.718;
			if(gl==29)
				xl2=52.336;
		}
		if(xl>=0.009 && xl<=0.011){
			if(gl==25)
				xl2=44.314;
			if(gl==40)
				xl2=63.619;
		}
		if(xl>=0.024 && xl<=0.026){
			if(gl==7)
				xl2=16.013;
			if(gl==14)
				xl2=26.119;
			if(gl==16)
				xl2=28.845;
			if(gl==18)
				xl2=31.526;
			if(gl==19)
				xl2=32.852;
			if(gl==29)
				xl2=45.722;
		}
		if(xl>=0.049 && xl<=0.51){
			if(gl==7)
				xl2=14.067;
			if(gl==14)
				xl2=23.685;
			if(gl==17)
				xl2=27.587;
		}
		if(xl>=0.09 && xl<=0.11){
			if(gl==50)
				xl2=76.154;
			if(gl==10)
				xl2=23.209;
		}
		if(xl>=0.79 && xl<=0.81){
			if(gl==50)
				xl2=41.449;
			if(gl==10)
				xl2=6.179;
		}
		if(xl>=0.89 && xl<=0.91){
			if(gl==7)
				xl2=2.833;
			if(gl==10)
				xl2=4.865;
			if(gl==14)
				xl2=7.790;
			if(gl==17)
				xl2=10.085;
			if(gl==50)
				xl2=37.689;
		}
		if(xl>=0.949 && xl<=0.951){
			if(gl==7)
				xl2=2.167;
			if(gl==14)
				xl2=6.571;
			if(gl==16)
				xl2=7.961;
			if(gl==17)
				xl2=8.672;
			if(gl==18)
				xl2=9.390;
			if(gl==19)
				xl2=10.117;
			if(gl==29)
				xl2=17.708;
		}
		if(xl>=0.974 && xl<=0.976){
			if(gl==14)
				xl2=5.629;
			if(gl==16)
				xl2=6.908;
			if(gl==18)
				xl2=8.231;
			if(gl==19)
				xl2=8.907;
			if(gl==29)
				xl2=16.047;
		}
		if(xl>=0.979 && xl<=0.981){
			if(gl==25)
				xl2=12.697;
			if(gl==40)
				xl2=23.838;
		}
		if(xl>=0.989 && xl<=0.991){
			if(gl==6)
				xl2=0.872;
			if(gl==13)
				xl2=4.107;
			if(gl==14)
				xl2=4.660;
			if(gl==17)
				xl2=6.408;
			if(gl==25)
				xl2=11.524;
			if(gl==29)
				xl2=14.256;
			if(gl==40)
				xl2=22.164;
		}
		if(xl>=0.994 && xl<=0.996){
			if(gl==6)
				xl2=0.676;
			if(gl==13)
				xl2=3.565;
			if(gl==14)
				xl2=4.075;
			if(gl==17)
				xl2=5.697;
			if(gl==29)
				xl2=13.121;
		}
		
		printf("Sabendo que:\nA quantidade (n) de dados do conjunto é '%d'\n& o nível de confiança é de '%.2f%%', temos que:\n",n,c);
		printf("O valor de Xr é '%.3f'\nO valor do Xl é '%.3f'\n",xl2,xr2);
	}
}