Universität Ulm - Abteilung Angewandte Informationsverarbeitung
11. Übungsblatt (23.01.02 bis 30.01.02) zur Vorlesung
WS 2001/2002
Allgemeine Informatik I für Wirtschaftswissenschaftler und Biologen
Kennen Sie Ihren Body Mass Index? ... Teil II (10 Punkte)
Im letzten Übungsblatt haben Sie ein Oberon-Programm geschrieben, das eine BMI-Analyse durchführt (vgl. Blatt 10). Nun soll dieses Programm durch die Verwendung von Prozeduren erweitert werden.
Schreiben Sie Ihr altes Programm derart um, so daß das Hauptprogramm nur noch den folgenden Inhalt hat:
BEGIN (* Read all data *) ReadData(data,count); (* Get minimum, maximum and average *) min:=GetMinimum(data,count); max:=GetMaximum(data,count); average:=GetAverage(data,count); (* Print results *) Write.Ln; Print.F("Patientendaten:\n"); PrintData(data,count); Write.Ln; Print.F("Statistische Auswertung:\n"); Print.F1(" Minimaler BMI : %5.2f\n",min); Print.F1(" Maximaler BMI : %5.2f\n",max); Print.F1(" Durchschnitts-BMI : %5.2f\n",average); END BodyMassIndex2.
Sie müssen somit die folgenden Prozeduren implementieren:
ReadData(), GetMinimum(), GetMaximum(),
GetAverage(), PrintData()
Nützliche Hinweise:
Viel Erfolg!!!