Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  AW: Befehl 'round' macht schlapp

   
    by Sir Rufo, 24. Feb 2014
  Mathe ist nicht deine Stärke ;)
  
  = 6 - / * 5
  
  Wenn du schon so eine Formel hast, warum schreibst du die dann nicht genau so in Delphi hin?
  
  function GetSchulnote( ErreichtePunktzahl, GesamtPunktzahl : Integer ) : Integer;
  begin
  Result := 6 - Round( ErreichtePunktzahl / GesamtPunktzahl * 5 );
  end;