Lenguaje C
Descripción Para estimar la altura de un individuo, los forenses y antropólogos suelen utilizar huesos largos de la pierna. Los datos son fiables siempre que se utilicen huesos adultos, y primero hay que determinar si el hueso utilizado es de un hombre o de una mujer.
Las ecuaciones que nos determinan la altura en función de las medidas del fémur o de la tibia son ecuaciones de rectas, veamos las fórmulas de estas rectas y las estimaciones de la altura de un varón en función del fémur y de la tibia.
Fórmulas para determinar estatura
(Trotter y Glewser, 1958)
Huesos | Varones | Mujeres
Fémur | 2.38 x long. máx + 61.41 | 2.47 x long. máx + 54.10
Tibia | 2.52 x long. máx + 78.62 | 2.90 x long. máx + 61.53
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
#include <stdio.h>
#include <stdlib.h>
#include <conio.h>

int main (void)
{
    int genero, hueso;
    float altura, long_max;
    char tecla_repetir;
    do {
        system ("cls");
        printf ("Ingrese el valor de long max: ");
        scanf ("%f", &long_max);
        printf ("Seleccione el valor de hueso.\n");
        printf ("\t1.- F\202mur\n");
        printf ("\t2.- Tibia\n");
        printf ("\t: ");
        do {
            scanf ("%d", &hueso);
            if (hueso<1||hueso>2)
                printf ("Valor incorrecto. Ingr\202selo nuevamente.: ");
        } while (hueso<1||hueso>2);
        printf ("Seleccione el valor de genero.\n");
        printf ("\t1.- Var\242n\n");
        printf ("\t2.- Mujer\n");
        printf ("\t: ");
        do {
            scanf ("%d", &genero);
            if (genero<1||genero>2)
                printf ("Valor incorrecto. Ingr\202selo nuevamente.: ");
        } while (genero<1||genero>2);
        altura=0;
        if(hueso==1&&genero==1)
            altura=2.38*long_max+61.41;
        if(hueso==1&&genero==2)
            altura=2.47*long_max+54.10;
        if(hueso==2&&genero==1)
            altura=2.52*long_max+78.62;
        if(hueso==2&&genero==2)
            altura=2.90*long_max+61.53;
        printf ("Valor de altura: %g\n", altura);
        putchar ('\n');
        printf ("\250Desea repetir el proceso? (S/N): ");
        do {
            tecla_repetir = (char) getch();
        } while (tecla_repetir!='s' && tecla_repetir!='n' && tecla_repetir!='S' && tecla_repetir!='N');
        putchar ('\n');
    } while (tecla_repetir=='s' || tecla_repetir=='S');
    return EXIT_SUCCESS;
}