aber wie zu allen themen: die antwort lautet
42! Die zahl muss also 42mal minus 42 genommen werden. den sie dann immernoch >0 ist dan nochmal
also:
Delphi-Quellcode:
function negation(zahl, diezahl:integer):integer;
//macht aus JEDER zahl eine Negative ^^
goto 1; //da ich noch nie GOTO´s angewendet habe vermute ich einfach mal das die hier deklariert werden
i, x:integer;
begin
diezahl:=42; //damit kann ausgeschlossen werden das unwissende etwas anderes angeben!
1:for i:=0 to diezahl do
for x:=0 to diezahl do
zahl:=zahl-diezahl;
if zahl>=0 then goto 1;
end;
damit dürfte IMMER etwas negatives rauskommen auch wenn man eine noch so hohe zahl nimmt!
