Programm irreperabel?

[Daniel B]

Hi,

also die Variablen lassen sich jedenfall ein bisschen zusammenfalten. Ausserdem solltest Du beim ix und! bei Ergebnisx mit 0 anfangen, sonst ist das um 1 verschoben und Du kommst da evtl. durcheinander, habe ich jetzt da schon mit reingemacht.

Delphi-Quellcode:

var
  i, i1, i2, i3, i4, i4, i5, i6, i7, i8, i9,
    i10, i11, i12, i13, i14, i15, i16, i17, i18, i19: Integer;
  Ergebnis, Ergebnis1, Ergebnis2, Ergebnis3, Ergebnis4,
    Ergebnis5, Ergebnis6, Ergebnis7, Ergebnis8, Ergebnis9,
    Ergebnis10, Ergebnis11, Ergebnis12, Ergebnis13, Ergebnis14,
    Ergebnis15, Ergebnis16, Ergebnis17, Ergebnis18, Ergebnis19: Extendet;