// bmi.cpp
// --------------  Version 10.04.2010
//                 IPC@CHIP: Fliesskommaemulation ein
//                 D.Schwarzer, www.GoBlack.de

// Thema: Body-Mass-Index nach der Formel bmi= m/l*l berechnen.
// Es werden die Fliesskommaemulation oder ein Fließkommaprozessor
// benötigt


// Headerdateien der IDE
#include <conio.h>
#include <stdio.h>


// fbmi()
// berechnung des BMI im Fliesskommaformat. Bei einer Grössenangabe
// von 0 oder kleiner und bei solchen größer als 3m gibt die
// Funktion 0 zurück
double fbmi (double masse, double groesse)
{
  if(groesse<=0 || groesse>2.55)return(0);
  return(masse /(groesse*groesse));
}


// main()
// Testprogramm mit festen Vorgaben für Gewicht und Körpergröße
void main(void)
{
  double gewicht = 80;
  double laenge  = 1.77;
  double bmi     = 0;

  bmi= fbmi(gewicht, laenge);
  printf("\r\n bei einer Groesse von: %5.2fm"
         "\r\n und einem Gewicht von: %5.2fkg"
         "\r\n betraegt der Body-Mass-Index = %5.2fkg/m^2",
         laenge, gewicht, bmi);
  getch();
}

• Da bei der Ganzzahlarithmetik keine Nachkommastellen auftreten, muss die in kg angegebene Masse mit dem Faktor 100*100 multipliziert werden, denn die Körpergröße wird ja um den Faktor 100 vergrößert übergeben um dann quadriert zu werden. Dies überfordert Speicherzellen vom Typ unsigned, es sei denn, man will nur Gewichte unter 6 kg angeben. (6*100*100 = 60 000 (max.unsigned 65535)).
• Das vorhergehende Problem lässt sich durch einen Speicher vom Typ long umgehen. Dieser kann Werte bis 2³² : 2 => -2 147 483 648 bis +2 147 483 647 aufnehmen, so dass der Mensch zusammen mit der nachfolgenden Überlegung noch ein Gewicht von 2147kg haben dürfte.
• Man erhält nun wieder einen ganzzahligen BMI der jedoch keine 'Nachkommastellen' beinhaltet. Eine weitere Multiplikation mit 100 würde es später möglich machen, 2 Nachkommastellen zu isolieren, denn durch die letzte Multiplikation wäre das Ergebnis um 100 zu groß.
• Die Quadratbildung der Körpergröße funktioniert in einem Speicher vom Typ unsigned nur bis 255, denn 256*256=35536 ist bereits um 1 zu groß für diesen Speichertyp. Allerdings könnte man dieses Problem umgehen, wenn man zwei mal durch die Körpergröße teilt, denn z : (p • p) = z : p : p.

// bmi.cpp
// --------------  Version 10.04.2010
//                 IPC@CHIP: Fliesskommaemulation aus
//                 D.Schwarzer, www.GoBlack.de

// Thema: Body-Mass-Index nach der Formel bmi= m/l*l berechnen.
// Alle Berechnungen im Ganzzahlformat


// Headerdateien der IDE
#include <conio.h>
#include <stdio.h>


// gbmi()
// berechnung des BMI im Ganzzahlformat und um den Faktor 100, zum
// Erhalt zweier Nachkommastellen, zu groß. Die Multiplikation der
// Masse mit 100*100 berücksichtigt die Angabe der Körpergröße
// in cm.
// Rückgabe:
//  0, bei Übergaben der Körpergrösse kleiner gleich 0
//     und größer als 2,55m (da 255*255 = 65025 max. unsigned)
//     deswegen besser Möglichkeit 2 (=> beliebige Längenangaben) 
unsigned gbmi (unsigned masse, unsigned groesse)
{
  long m=((long)masse)*100*100 * 100;
  if(groesse<=0 || groesse>255)return 0;
  //  return((unsigned)(m /(groesse*groesse)));  // 1. Möglichkeit
  return((unsigned)(m / groesse / groesse));     //    .. besser
}


// main()
// Testprogramm mit festen Vorgaben für Gewicht und Körpergröße. Es
// ist hier die Zerlegung des BMI in einen Vorkomma- und einen
// Nachkommaanteil zu beachten. Beide werden durch ein Komma
// getrennt, einzeln ausgegeben
void main(void)
{
  unsigned gewicht = 80;
  unsigned laenge  = 177;
  unsigned bmi= 0, bmivk=0, bmink=0;

  bmi= gbmi(gewicht, laenge);     // Berechnung des BMI*100
  bmivk=bmi / 100;                // Vorkommaanteil isolieren
  bmink=bmi % 100;                // Nachkommaanteil isolieren

  printf("\r\n bei einer Groesse von: %3.0dcm"
         "\r\n und einem Gewicht von: %3.0dkg"
         "\r\n betraegt der Body Mass Index = %2.0d,%0.2dkg/m^2",
         laenge, gewicht, bmivk, bmink);
  getch();
}

// bmi.cpp
// --------------  Version 10.04.2010
//                 IPC@CHIP: Fliesskommaemulation aus
//                 D.Schwarzer, www.GoBlack.de

// Thema: Body-Mass-Index nach der Formel bmi= m/l*l berechnen.
// Alle Berechnungen im Ganzzahlformat mit Eingabe der Größen


// Headerdateien der IDE
#include <conio.h>
#include <stdio.h>
#include <stdlib.h>

// eigene Headerdatei für Tastatureingaben
#include "fstrgin.h"
                               //  fstrgin.h zum Kopieren ansehen


// gbmi()
// berechnung des BMI im Ganzzahlformat und um den Faktor 100, zum
// Erhalt zweier Nachkommastellen, zu groß. Die Multiplikation der
// Masse mit 100*100 berücksichtigt die Angabe der Körpergröße
// in cm.
// Rückgabe:
//  0, bei Übergaben der Körpergrösse kleiner gleich 0
//     und größer als 2,55m
unsigned gbmi (unsigned masse, unsigned groesse)
{
  long m=((long)masse)* 100*100 * 100;
  if(groesse<=0 || groesse>255)return 0;
  return((unsigned)(m / groesse / groesse));
}

// setStdio() nur für IPC@CHIP Bausteine
//            bei PC-Computern nicht aufrufen
// schaltet den Ein-/Ausgabestrom des IPC Webserver dem Parameter
// kanal entsprechend auf ..
//           RTOS Ein Aus  Benutzerprogramm Ein Aus
// kanal =1        x  x                      -   -
// kanal =2        -  -                      x   x
// kanal =3        x  x                      -   x     Vorgabe

void setStdio (char kanal)
{
   asm{ mov AH, 11h                 // SoftINT: A0h, Fkt: 11h
        mov AL, kanal
        int 0A0h      }
}

// main()
// Testprogramm mit festen Vorgaben für Gewicht und Körpergröße. Es
// ist hier die Zerlegung des BMI in einen Vorkomma- und einen
// Nachkommaanteil zu beachten. Beide werden durch ein Komma
// getrennt, einzeln ausgegeben. Das Programm kann nach einer
// Berechnung durch einen Druck auf die Taste [ESC] unterbrochen
// werden.
void main(void)
{
  // setStdio(2);         // IPC@CHIP -Eingaben zum eigen.Programm
  unsigned gewicht = 0;
  unsigned laenge  = 0;
  unsigned bmi= 0, bmivk=0, bmink=0;
  char txtbuf[10], c=0;

  while(c!= ESC){
   printf("\r\nGewicht in kg= ");        // Eingabeaufforderung
   fstrgin(txtbuf, 3, DEZ,"");           // Gewicht, 3 Dez-Stellen
   gewicht= atoi(txtbuf);                // in Integer wandeln

   printf("\r\nKoerpergroesse in cm= "); // Eingabeaufforderung
   fstrgin(txtbuf, 3, DEZ,"");           // Gewicht, 3 Dez-Stellen
   laenge= atoi(txtbuf);                 // in Integer wandeln


   bmi= gbmi(gewicht, laenge);         // Berechnung des BMI*100
   bmivk=bmi / 100;                    // Vorkommaanteil isolieren
   bmink=bmi % 100;                    // Nachkommaanteil isolieren

   printf("\r\n bei einer Groesse von: %3.0dcm"
          "\r\n und einem Gewicht von: %3.0dkg"
          "\r\n betraegt der Body Mass Index = %2.0d,%0.2dkg/m^2"
          "\r\n\n Ende [ESC], weiter [bel.Taste] ..",
          laenge, gewicht, bmivk, bmink);

   c=getch();
   printf ("\r\n\n");
  }
  // setStdio(3);         // IPC@CHIP -Eingaben zum Betriebssystem
}