Potenzen, Formatierungen und Tabellen

[axelf98]

Zitat von Carbrögen:

4. Das ist jetz rein Mathematisch glaube ich aber ich find keine lösung:
Ich hab diese 3 Spalten: Generation, Zeit, Bakterienanzahl.
Generation würde ich so lösen: In die Spalte "generation" schreibe ich jeweils i aus der For Schleife rein.
Zeit: Alle 20min Teilen sich die Bakterien. Ich habe eine Zeile schon da stehen, in der Steht "0h 00min". In Zeile 2 soll stehen "0h 20min" und so weiter... wie soll ich das machen!?

Damit kann man die Zeit im Format Xh XXmin ausgeben:
Eingangszahl ist eine real-Zahl: (20/60) wären 20 Minuten, einfach mit i malnehmen und in die Funktion schicken:
Listbox3.items.add( Zeitausgeben((1/3)*i));

Delphi-Quellcode:

function Zeitausgeben(Zeit:real) : String;
var
H,M : integer;
begin
 H := trunc(Zeit);
 M := round((Zeit - H)*60);
 if M < 10 then
 result := inttostr(H)+'h 0'+inttostr(M)+'min' ELSE
 result := inttostr(H)+'h '+inttostr(M)+'min';
end;