PROGRAMA EMP. DE ENERGIA

Publicado por DEMIS CARLOS FONSECA GOMES 23/06/2004

[ Hits: 5.720 ]

Homepage: www.portonaweb.com

Download celtins002.cpp




Cálculo da média de consumo e quanto cada consumidor irá pagar!!!!

  



Esconder cůdigo-fonte

/* 
Por DÍmis Carlos Fonseca Gomes
[email protected]
Ciencia da Computacao
2ļ Periodo 
Universidade Federal do Tocantins
Palmas-TO.
*/
#include<stdio.h>
#include<conio.h>
#include<conio.c>
#include<stdlib.h>

main()
{
float res,com,ind,media1,media2, media3,soma_total_de_cons_res,soma_total_de_cons_com,soma_total_de_cons_ind,kwh,kwh2,kwh3,a_pagar,a_pagar2,a_pagar3,pagamento,pagamento2,pagamento3;
int cont_res,cont_com,cont_ind,x,y,z,quant_cons1,quant_cons2,quant_cons3,opcao,opcao_pag;
char quadra[30];
textcolor(12);
textbackground(15);
system("cls");
printf("\n\n\n\n\n\n");
printf("\n\n\t\t\t\333\333\333\333\333\333††REDE CELTINS \333\333\333\333\333\333");
printf("\n\n\n\n\n\t†††††††††††††††††††††† \333\333\333\333\333\333\333\333\333\333\333\333\n");
printf("††††††††††††††††††††††††††††††\333\333\333\333\333\333\333\333\333\333\333\333\n");
printf("†††††††††††††††††††††††††††† \333\333\333\333\333\333\333\333\333\333\333\333\n");
printf("††††††††††††††††††††††††††††\333\333\333\333\333\333\333\333\333\333\333\333\n");
printf("†††††††††††††††††††††††††† \333\333\333\333\333\333\333\333\333\333\333\333\n");
printf("††††††††††††††††††††††††††\333\333\333\333\333\333\333\333\333\333\333\333\333\333\333\333\333\333\333\n");
printf("†††††††††††††††††††††††† \333\333\333\333\333\333\333\333\333\333\333\333\333\333\333\333\333\333\333\n");
printf("††††††††††††††††††††††††††††††††\333\333\333\333\333\333\333\333\333\333\333\n");
printf("†††††††††††††††††††††††††††††† \333\333\333\333\333\333\333\333\333\333\n");
printf("††††††††††††††††††††††††††††††\333\333\333\333\333\333\333\333\333\n");
printf("†††††††††††††††††††††††††††† \333\333\333\333\333\333\333\333\n");
printf("††††††††††††††††††††††††††††\333\333\333\333\333\333\333\n");
printf("†††††††††††††††††††††††††† \333\333\333\333\333\333\n");
printf("††††††††††††††††††††††††††\333\333\333\333\333\n");
printf("†††††††††††††††††††††††† \333\333\333\333\n");
printf("††††††††††††††††††††††††\333\333\333\n");
printf("†††††††††††††††††††††† \333\333\n");
getch();
system("cls");
while(opcao!=5)
{
††††textbackground(15);
††††system("cls");
††††printf("\n\n\n");
††††printf("\t\t\t\333\333REDE CELTINS\333\333\n\n");
††††printf("\t\t\tDigite:\n");
††††printf("†††††† |1| --> Consumo Residencial\n");
††††printf("†††††† |2| --> Consumo Comercial\n");
††††printf("†††††† |3| --> Consumo Industrial\n");
††††printf("†††††† |4| --> Saiba quanto vc esta' pagando pelo consumo\n");
††††printf("†††††† |5| --> Sair do Programa . . .\n");
††††scanf("%d",&opcao);
††††system("cls");
††††if (opcao>5 && opcao!=5)
††††{
†††† printf("\n\nOpcao Invalida/ Digite as opcoes de 1 a 4 ou 5 para encerrar o programa\n\n\n\n");
†††† printf("\n\nTecle enter para voltar ao menu de opcoes\n");
†††† getch();
†††† system("cls");
††††}
††††if(opcao==1)
††††{
††††††††float res,media1,soma_total_de_cons_res,pagamento;
††††††††int cont_res,x,quant_cons1;
††††††††printf("\n\n\n\t\t\t\333\333REDE CELTINS\333\333\n\n");
††††††††printf("\t\t\tGUIA DE CONSUMO RESIDENCIAL\n");
††††††††printf("\t\t\tEm que quadra de Palmas voce mora\77\n\n");
††††††††scanf("%s",&quadra);
††††††††printf("\t\t\tDigite a quantidade de consumidores da sua quadra:");
††††††††scanf("%d",&quant_cons1);
††††††††for(cont_res=0;cont_res<=quant_cons1;cont_res++)
††††††††{
††††††††††††for(x=1;x<=quant_cons1;x++)
††††††††††††{
†††††††††††††††† printf("\t\t\t\n\nDigite a quantidade de Kw//h do consumidor %d:\n\n",x);
†††††††††††††††† scanf("%f",&res);
†††††††††††††††† soma_total_de_cons_res=soma_total_de_cons_res + res;
†††††††††††††† media1=soma_total_de_cons_res/quant_cons1;
†††††††††††††† pagamento=res*0.37;
†††††††††††††† printf("\t\t\t\n\n\a\a\aO cliente %d cliente pagara' por isso R$ %.2f",x,pagamento);
††††††††††††}
††††††††††††printf("\n\nA soma de todo o consumo resulta atualmente em %.2f:\n\n",soma_total_de_cons_res);
††††††††††††printf("A media de consumo dos consumidores da quadra %s atualmente e' de %.2f:\n\n",quadra,media1);
††††††††††††getch();
††††††††††††system("cls");
††††††††††††break;
††††††††††††
††† }
††† }
†††† if(opcao==2)
††††{
††††††††printf("\n\n\n\t\t\t\333\333REDE CELTINS\333\333\n\n");
††††††††printf("\t\t\tGUIA DE CONSUMO COMERCIAL\n");
††††††††printf("\t\t\tEm que quadra de Palmas voce mora\77\n\n");
††††††††scanf("%s",&quadra);
††††††††printf("\t\t\tDigite a quantidade de consumidores da sua quadra:");
††††††††scanf("%d",&quant_cons2);
††††††††for(cont_com=0;cont_com<=quant_cons2;cont_com++)
††††††††{
††††††††††††for(y=1;y<=quant_cons2;y++)
††††††††††††{
†††††††††††††††† printf("\t\t\t\n\nDigite a quantidade de Kw//h do consumidor %d:\n\n",y);
†††††††††††††††† scanf("%f",&com);
†††††††††††††††† soma_total_de_cons_com=soma_total_de_cons_com + com;
†††††††††††††† media2=soma_total_de_cons_com/quant_cons2;
†††††††††††††† pagamento2=com*0.53;
†††††††††††††† printf("\t\t\t\n\n\a\a\aO cliente %d cliente pagara' por isso R$ %.2f",y,pagamento2);
††††††††††††}
††††††††††††printf("\n\nA soma de todo o consumo resulta atualmente em %.2f:\n\n",soma_total_de_cons_com);
††††††††††††printf("A media de consumo dos consumidores da quadra %s atualmente e' de %.2f:\n\n",quadra,media2);
††††††††††††getch();
††††††††††††system("cls");
††††††††††††break;
†††††††}
†††† }
†††† if(opcao==3)
††††{
††††††††printf("\n\n\n\t\t\t\333\333REDE CELTINS\333\333\n\n");
††††††††printf("\t\t\tGUIA DE CONSUMO INDUSTRIAL\n");
††††††††printf("\t\t\tEm que quadra de Palmas voce mora\77\n\n");
††††††††scanf("%s",&quadra);
††††††††printf("\t\t\tDigite a quantidade de consumidores da sua quadra:");
††††††††scanf("%d",&quant_cons3);
††††††††for(cont_ind=0;cont_ind<=quant_cons3;cont_ind++)
††††††††{
††††††††††††for(z=1;z<=quant_cons3;z++)
††††††††††††{
†††††††††††††††† printf("\t\t\t\n\nDigite a quantidade de Kw//h do consumidor %d:\n\n",z);
†††††††††††††††† scanf("%f",&ind);
†††††††††††††††† soma_total_de_cons_ind=soma_total_de_cons_ind + ind;
†††††††††††††† media3=soma_total_de_cons_ind/quant_cons3;
†††††††††††††† pagamento3=ind*0.72;
†††††††††††††† printf("\t\t\t\n\n\a\a\aO cliente %d cliente pagara' por isso R$ %.2f",z,pagamento3);
††††††††††††}
††††††††††††printf("\n\nA soma de todo o consumo resulta atualmente em %.2f:\n\n",soma_total_de_cons_ind);
††††††††††††printf("A media de consumo dos consumidores da quadra %s atualmente e' de %.2f:\n\n",quadra,media3);
††††††††††††getch();
††††††††††††system("cls");
††††††††††††break;
†††††††}
†††† }
††††††if(opcao==4)
††††††{
††††††††printf("\n\n\n\t\t\tVc esta' classificado em que tipo\77\n\n");
††††††††printf("\t\t\t============ Digite a opcao =============\n\n");
††††††††printf("\t\t\t††††††††††††††|1| --> Residencial\n");
††††††††printf("\t\t\t††††††††††††††|2| --> Comercial\n");
††††††††printf("\t\t\t††††††††††††††|3| --> Industrial\n");
††††††††scanf("%d",&opcao_pag);
††††††††system("cls");
††††††††††††††if (opcao_pag==1)
†††††††††††††††††††† {
††††††††††††††††††††††††printf("\n\n\n\t\t\t\333\333REDE CELTINS\333\333\n\n");
††††††††††††††††††††††††printf("QUANTO PAGAREI PELO CONSUMO DA MINHA RESIDENCIA\77\n\n");
††††††††††††††††††††††††printf("Quanto voce gastou em Kw/h\77†† ");
††††††††††††††††††††††††scanf("%f",&kwh);
††††††††††††††††††††††††a_pagar=0.37*kwh;
††††††††††††††††††††††††printf("\n\nVoce pagara' por isso ----> R$ %.2f",a_pagar);
††††††††††††††††††††††††getch();
††††††††††††††††††††††††system("cls");
†††††††††††††††††††† }
†††††††††††† if (opcao_pag==2)
†††††††††††††††††††† {
††††††††††††††††††††††††printf("\n\n\n\t\t\t\333\333REDE CELTINS\333\333\n\n");
††††††††††††††††††††††††printf("QUANTO PAGAREI PELO CONSUMO DO MEU COMERCIO\77\n\n");
††††††††††††††††††††††††printf("\t\t\tQuanto voce gastou em Kw/h\77†† ");
††††††††††††††††††††††††scanf("%f",&kwh2);
††††††††††††††††††††††††a_pagar2=0.53*kwh2;
††††††††††††††††††††††††printf("\n\n\t\t\tVoce pagara' por isso ----> R$ %.2f",a_pagar2);
††††††††††††††††††††††††getch();
††††††††††††††††††††††††system("cls");
†††††††††††††††††††† }
††††††††††††if (opcao_pag==3)
†††††††††††††††††††† {
††††††††††††††††††††††††printf("\n\n\n\t\t\t\333\333REDE CELTINS\333\333\n\n");
††††††††††††††††††††††††printf("QUANTO PAGAREI PELO CONSUMO DA MINHA INDUSTRIA\77\n\n");
††††††††††††††††††††††††printf("\t\t\tQuanto voce gastou em Kw/h\77†† ");
††††††††††††††††††††††††scanf("%f",&kwh3);
††††††††††††††††††††††††a_pagar3=0.72*kwh3;
††††††††††††††††††††††††printf("\t\t\t\n\nVoce pagara' por isso ----> R$ %.2f",a_pagar3);
††††††††††††††††††††††††getch();
††††††††††††††††††††††††system("cls");
†††††††††††††††††††† }
†††† }
†††† if(opcao==5)
†††† {
†††† textbackground(15);
†††† system("cls");
†††† printf("\n\n\n\n\n\n");
†††† printf("\n\n\n\t\t\t†† \333\333\333\333\333\333††REDE CELTINS \333\333\333\333\333\333\n");
†††† textcolor(2);
†††† cprintf("\t\t\t\333\333\333\333 AGENTE SONHA, AGENTE FAZ \333\333\333\333\n");
†††† textcolor(4);
†††† cprintf("\n\n\n\n\n\n\n\n\n\n\t\t\t\t\t\tBy -----------\n");
†††† getch();
†††† }
 }
}




Scripts recomendados

MŃGICO

Cria os dŪgitos verificadores para CPF

Comando Sleep Multiplataforma

Uma pincelada no printf

Fatorial Recurssivo


  

ComentŠrios

Nenhum comentŠrio foi encontrado.


Contribuir com comentŠrio