12345678
ובסוף היא תגיע ל99999999עזרה דחוף תודה לעוזרים!!!!
program files (input,output);var f : Text; i : LongInt;begin Assign(f,'numbers.txt'); rewrite(f); for i:=1 to 99999999 do writeln(f,i); close(f);end.
תודה מראש