habt ihr vllt noch ein paar Sachen die man noch in die PP einbauen kann ? zB ein Schaubild ? hab bisher kein geeignetes gefunden
Um DadyH nicht wieder zu übergehen, er hat im Beitrag
#11 auf Wikipedia verlinkt, und da finden sich paar nette Bilder, in etwa:
http://upload.wikimedia.org/wikipedi...0/EinfAusw.png
Zitat:
ahh ja vllt hat noch einer ne Idee für das Programm ... hab ihn heut nochmal gefragt und er meinte man muss eins haben ausm Alltag was es aber noch net irgendwie gibt....
Wenn es kein technisches sein muss, das Beispiel mit Cola war durchaus ernst gemeint
Delphi-Quellcode:
const
DosenInhalt = 330; //ml
NormSchluck = 20; //ml
var
GetraenkInhalt, SchluckInhalt, AnzahlSchlucke: Integer;
begin
GetraenkInhalt := DosenInhalt;
AnzahlSchlucke := 0;
ShowMessage('In der Getränkedose befinden sich ' + IntToStr(GetraenkInhalt) + ' ml.');
while GetraenkInhalt > 0 do
begin
if GetraenkInhalt > NormSchluck then SchluckInhalt := NormSchluck else SchluckInhalt := GetraenkInhalt;
GetraenkInhalt := GetraenkInhalt - SchluckInhalt;
AnzahlSchlucke := AnzahlSchlucke + 1;
ShowMessage('In der Getränkedose befinden sich noch ' + IntToStr(GetraenkInhalt) + ' ml.');
end;
ShowMessage('Die Getränkedose ist leer.' + #13#10 +
'Es wurden ' + IntToStr(AnzahlSchlucke) + ' Schlucke getrunken.');
end;
So in der Art auch das mit mit Repeat Until und der Arbeit