турбо паскаль Code: uses crt; var i:integer; f:text; begin assign(f,'123.txt'); rewrite(f); for i:=0 to 9999 do writeln(f,i); close(f); end.
DooD, твоя программа будет писать от 0...50...100...9999, а надо 0000...0050...0100...9999 JavaScript PHP: <script> for(var i = 0; i <= 9999; i++) { num = i.toString(); zeros = new Array(5 - num.length); document.write(zeros.join("0") + num + "<br>"); } </script> Ins3t, fixed
Мой первый скрипт на перл PHP: open FILE, '>>file.txt'; for($i = 0; $i<=9999; $i++) { $str = sprintf "%04d\n",$i; print FILE $str; } close FILE; UDP: Ой оказывается уже был пост от krypt3r
Code: тут был код на брейфаке...пытаюсь решить проблему брейнфак заказывали? блин, ошибка...выводит 1...50...100....