Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  AW: Beginner: Münzwurf

    Delphi
    by Klaus01, 29. Nov 2016
  program Muenzwurf;
  var n,x,Anzahl,Zufall, oddCount:Int64;
  begin
  writeln('Muenzwurf');
  writeln('Wie oft soll die Muenze geworfen werden?');
  readln(Anzahl);
  oddCount := 0;
  for n:=0 to Anzahl do
  begin
  x:=n+1;