Áreas de un círculo.

Recientemente ando desempolvando algunos conocimientos en lenguajes de programación. No porque el día a día me los exija, pero siempre es bueno la comprensión desde las entrañas de lo que adminisitras. Otro punto es que la programación mantiene al cerebro despierto y posibilida su mejor comprensión de las cosas.

Este caso encontré unos apuntes cuando estudiaba la preparatoria hace poco más dee 10 años. En ese momento vimos algo de C. Más por melancólico que por sentido de la practicidad, subo uno de los códigos que encontré. Con algo de tiempo, iré subiendo más de mis apuntes, solo como parte de una memoria histórica de mi paso por las TI.

El objetivo del código es ralizar ene cantidad de cálculos de áreas de círculos (hasta que la palabr FIN sea encontrada). Elegí este código por el uso de estructuras; tipos de datos que ya había olvidado y que gracias mi cuaderno las recordé.

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

#include
#define PI 3.14159
 
int main() {
int n=0;
int i=0;
 
struct {
  char texto[20];
  float radio;
  float area;
}circulo[10];
 
float procesar(float radio);
 
printf("Para parar, persiona FIN\n");
printf("\nIndicador: ");
scanf("%s", &circulo[i].texto);
 
while(circulo[i].texto[0] != 'F' || circulo[i].texto[1] !='I' || circulo[i].texto[2] !='N') {
  printf("\nRadio: \n");
  scanf("%f", &circulo[i].radio);
  if(circulo[i].radio <=0)
    circulo[i].area=0;
  else
    circulo[i].area = procesar(circulo[i].radio);
 
i++;
printf("\nIndicador: ");
scanf("%s", circulo[i].texto);
}
 
n=--i;
printf("\n\n Relacion de resultados\n\n");
for(i=0;i<=n;i++) {
  printf("%s radio = %f area = %f \n", circulo[i].texto, circulo[i].radio, circulo[i].area);
}
 
return 0;
}
 
 
float procesar(float r) {
 
  float a;
  a = PI * r * r;
  return (a);
}


Download código fuente.



Comentarios

Entradas populares de este blog

Análisis de conexiones TIME_WAIT

Agregar un usuario a un grupo secundario

Desencriptar passwords AES y DES en WebLogic 10