O que acharam? Sei lá to sem idéias e sem tempo! ;) Agora tem que pensar na frase! xD(Clique na imagem para ampliar!)
O que acharam? Sei lá to sem idéias e sem tempo! ;) Agora tem que pensar na frase! xDfor(j=1;j<=20;j++){
if(j%2!=0){
line(85-3, 85+j*yScale, 85, 85+j*yScale);//impar
switch(j){
case 1: outtextxy(85-25, 85+j*yScale+7, "18");break;
case 3: outtextxy(85-25, 85+j*yScale+7, "16");break;
case 5: outtextxy(85-25, 85+j*yScale+7, "14");break;
case 7: outtextxy(85-25, 85+j*yScale+7, "12");break;
case 9: outtextxy(85-25, 85+j*yScale+7, "10");break;
case 11: outtextxy(85-15, 85+j*yScale+7, "8");break;
case 13: outtextxy(85-15, 85+j*yScale+7, "6");break;
case 15: outtextxy(85-15, 85+j*yScale+7, "4");break;
case 17: outtextxy(85-15, 85+j*yScale+7, "2");break;
case 19: outtextxy(85-15, 85+j*yScale+7, "0");break;
};//SWHICH
}else{
line(85-5, 85+j*yScale, 24*xScale+85, 85+j*yScale); //par
}//ELSE
}//FOR
// VERTICAIS
line(85, 20*yScale+85+5, 85, 85); //esquerda
outtextxy(85-15, 20*yScale+85+15, "0,00");
for(j=1;j<=24;j++){
if((j==2)||(j==6)||(j==10)||(j==14)||(j==18)||(j==22)){
line(j*xScale+85, 20*yScale+85+3, j*xScale+85, 20*yScale+85);
}else if((j==4)||(j==8)||(j==12)||(j==16)||(j==20)||(j==24)){
line(j*xScale+85, 20*yScale+85+5, j*xScale+85, 85);
switch(j){
case 4: outtextxy(j*xScale+85-15, 20*yScale+85+15, "4,00");break;
case 8: outtextxy(j*xScale+85-15, 20*yScale+85+15, "8,00");break;
case 12: outtextxy(j*xScale+85-15, 20*yScale+85+15, "12,00");break;
case 16: outtextxy(j*xScale+85-15, 20*yScale+85+15, "16,00");break;
case 20: outtextxy(j*xScale+85-15, 20*yScale+85+15, "20,00");break;
case 24: outtextxy(j*xScale+85-15, 20*yScale+85+15, "24,00");break;
};//SWHICH
}// ELSE IF
}// FOR
setfillstyle(SOLID_FILL, BLUE);
setcolor(BLUE);
arqfunc = fopen("2003I01F.SJC", "r");
// Teste de erros
if (arqfunc == NULL) {
printf("Ocorreu um Erro no arquivo!");
getch();
exit(1);
} else {
// Ler cabecalho e copiar cabecalho
memset(szLinha,'\0',sizeof(szLinha));
fgets(szLinha,11,arqfunc);
fgets(szLinha,19,arqfunc);
fgets(szLinha,38,arqfunc); szLinha[35] = '\0';
// Lendo os dados e copiando os dados
while (aux != EOF){
if(getc(arqfunc) == EOF) {
break;
}
i = i + 1;
aux = fscanf(arqfunc, "%s\t%s\t%d\t%f\t%d\t%c\t%c",&f1, &f2, &i1, &f3, &i2, &c1, &c2);
ut = atof(f1);
if((ut == 0.0)||(f3 == 0.0)){
//
}
else{
XData = ut;
YData = f3;
X = XData * xScale + 85; //Posição do Ponto em X
Y = 85+20*yScale-(YData * yScale); //Posição do Ponto em Y
circle(X,Y,1);
if(i==1){
//
}
else {
line(Xtemp, Ytemp, X, Y);
}
Xtemp = X;
Ytemp = Y;
}//ELSE
}//WHILE
// Fechando os arquivos abertos
fclose (arqfunc);
}//ELSE
getch();
closegraph();
return 0;
}
for(j=1;j<=450;j++){
if(j%2!=0){
switch(j){
case 425: line(85-3, 85+j*yScale, 85, 85+j*yScale);break;
case 375: line(85-3, 85+j*yScale, 85, 85+j*yScale);break;
case 325: line(85-3, 85+j*yScale, 85, 85+j*yScale);break;
case 275: line(85-3, 85+j*yScale, 85, 85+j*yScale);break;
case 225: line(85-3, 85+j*yScale, 85, 85+j*yScale);break;
case 175: line(85-3, 85+j*yScale, 85, 85+j*yScale);break;
case 125: line(85-3, 85+j*yScale, 85, 85+j*yScale);break;
case 75: line(85-3, 85+j*yScale, 85, 85+j*yScale);break;
case 25: line(85-3, 85+j*yScale, 85, 85+j*yScale);break;
};//SWHICH
}else{
switch(j){
case 450:
outtextxy(85-25, 85+j*yScale-10, "0");
line(85-5, 85+j*yScale, 24*xScale+85, 85+j*yScale);
break;
case 400:
outtextxy(85-25, 85+j*yScale-10, "50");
line(85-5, 85+j*yScale, 24*xScale+85, 85+j*yScale);
break;
case 350:
outtextxy(85-32, 85+j*yScale-10, "100");
line(85-5, 85+j*yScale, 24*xScale+85, 85+j*yScale);
break;
case 300:
outtextxy(85-32, 85+j*yScale-10, "150");
line(85-5, 85+j*yScale, 24*xScale+85, 85+j*yScale);
break;
case 250:
outtextxy(85-32, 85+j*yScale-10, "200");
line(85-5, 85+j*yScale, 24*xScale+85, 85+j*yScale);
break;
case 200:
outtextxy(85-32, 85+j*yScale-10, "250");
line(85-5, 85+j*yScale, 24*xScale+85, 85+j*yScale);
break;
case 150:
outtextxy(85-32, 85+j*yScale-10, "300");
line(85-5, 85+j*yScale, 24*xScale+85, 85+j*yScale);
break;
case 100:
outtextxy(85-32, 85+j*yScale-10, "350");
line(85-5, 85+j*yScale, 24*xScale+85, 85+j*yScale);
break;
case 50:
outtextxy(85-32, 85+j*yScale-10, "400");
line(85-5, 85+j*yScale, 24*xScale+85, 85+j*yScale);
break;
};//SWHICH
}//ELSE
}//FOR
// VERTICAIS
line(85, 450*yScale+85+5, 85, 85); //esquerda
outtextxy(85-15, 450*yScale+85+15, "0,00");
for(j=1;j<=24;j++){
if((j==2)||(j==6)||(j==10)||(j==14)||(j==18)||(j==22)){
line(j*xScale+85, 450*yScale+85+3, j*xScale+85, 450*yScale+85);
}else if((j==4)||(j==8)||(j==12)||(j==16)||(j==20)||(j==24)){
line(j*xScale+85, 450*yScale+85+5, j*xScale+85, 85);
switch(j){
case 4: outtextxy(j*xScale+85-15, 450*yScale+85+15, "4,00");break;
case 8: outtextxy(j*xScale+85-15, 450*yScale+85+15, "8,00");break;
case 12: outtextxy(j*xScale+85-15, 450*yScale+85+15, "12,00");break;
case 16: outtextxy(j*xScale+85-15, 450*yScale+85+15, "16,00");break;
case 20: outtextxy(j*xScale+85-15, 450*yScale+85+15, "20,00");break;
case 24: outtextxy(j*xScale+85-15, 450*yScale+85+15, "24,00");break;
};//SWHICH
}// ELSE IF
}// FOR
arqfunc = fopen("2003I01F.SJC", "r");
// Teste de erros
if (arqfunc == NULL) {
printf("Ocorreu um Erro no arquivo!");
getch();
exit(1);
} else {
// Ler cabecalho e copiar cabecalho
memset(szLinha,'\0',sizeof(szLinha));
fgets(szLinha,11,arqfunc);
fgets(szLinha,19,arqfunc);
fgets(szLinha,38,arqfunc); szLinha[35] = '\0';
// Lendo os dados e copiando os dados
while (aux != EOF){
if(getc(arqfunc) == EOF) {
break;
}
i = i + 1;
aux = fscanf(arqfunc, "%s\t%s\t%s\t%f\t%s\t%c\t%c",&f1, &f2, &i1, &f3, &i2, &c1, &c2);
ut = atof(f1);
hf = atof(i1);
hpf2 = atof(i2);
if((ut == 0.0)||(hpf2 == 0.0)){
//
}
else{
setfillstyle(SOLID_FILL, RED);
setcolor(RED);
XData2 = ut;
YData2 = hpf2;
X2 = (XData2 * xScale2) + 85; //Posição do Ponto em X
Y2 = (85+(450*yScale))-(YData2 * yScale2); //Posição do Ponto em Y
circle(X2,Y2,1);
if(i==1){
//
}
else {
line(Xtemp2, Ytemp2, X2, Y2);
}
Xtemp2 = X2;
Ytemp2 = Y2;
}//ELSE
if((ut == 0.0)||(hf == 0.0)){
//
}
else{
setfillstyle(SOLID_FILL, BLUE);
setcolor(BLUE);
XData = ut;
YData = hf;
X = (XData * xScale) + 85; //Posição do Ponto em X
Y = (85+(450*yScale))-(YData * yScale); //Posição do Ponto em Y
circle(X,Y,1);
if(i==1){
//
}
else {
line(Xtemp, Ytemp, X, Y);
}
Xtemp = X;
Ytemp = Y;
}//ELSE
}//WHILE
// Fechando os arquivos abertos
fclose (arqfunc);
}//ELSE
getch();
closegraph();
return 0;
}

Estrutura do arquivo:
Onde UT (Universal Time - hora Universal) e LT (Local Time - hora local), h'F é a altura da camada F, foF2 é a freqüência crítica da camada F, hpF2 altura do pico da camada F, SF spread F, ES esporádica.
Grupo Ciência da Computação
| Grupo | Nome | Arquivo |
| 1 | Alberto Felipe D. Rodrigues | 2003I01F.SJC |
| 2 | André Luiz Ribeiro de Sousa | 2003I02F.SJC |
| 3 | Dalton D. Meira | 2003I03F.SJC |
| 4 | Diogo Mira Watabayashi | 2003I04F.SJC |
| 5 | Felipe Antonio Cardoso | 2003I05F.SJC |
| 6 | Fernando Costa | 2003I06F.SJC |
| 7 | Helio Tenoro dos Santos | 2003I07F.SJC |
| 8 | Janderci Pereira da Silva | 2003I08F.SJC |
| 9 | Leandro H. Mielle | 2003I09F.SJC |
| 10 | Marcos Antonio Sanches | 2003I10F.SJC |
| 11 | Rodolfo Sousa Guerra | 2003I11F.SJC |
| 12 | Walter Azevedo | 2003I12F.SJC |
| 13 | Jonatas Baltmant | 2003I13F.SJC |
O trabalho que cada grupo terá que realizar as seguintes operações sobre os dados:
- Ler o arquivo referente ao seu grupo (está na tabela acima);
- Calcular a média de: h'F, foF2 e hpF2;
- Calcular a diferença entre: hpF2 e h'F (hpF2 - h'F) e depois calcular a média desta coluna;
- Escrever o arquivo com as seguinte estrutura:
Médias 222.2 6.18 309 86.8

Faculdade - Ciência da Computação :: 6° Período \o/