Linux: различия между версиями

Строка 12:

* Работает на ПЭВМ «МежДелМаш ПЦ», «[[Макинтош|Деревянный макинтош]]», «СРБ9-Мишка», «Сызрань-2», «Итаник» .

* Имеет разнообразные встроенные модули — пищалку при [[kernel panic]], поддержку различных файловых систем (в том числе несуществующих), эмулятор дверной цепочки "ip chains" и фаервол «[[Iptables|IPtroubles]]» и даже поддержку кофеварки и подставки под пиво.

== Исходный код ядра Линупс ==

program linux;

uses ErrorGenerator, bash;

var login, password:string;

begin

while true do

begin

write('login:');

readln(login);

writeln('password:');

if random(20) < 5 then

StartBash(login)

else

WriteLn('Login incorrect!');

if random(100) = 1 then KernelPanic(random(50));

end;

end.

</nowiki></pre>

== Ссылки ==

@@ Строка 12: / Строка 12: @@
 * Работает на ПЭВМ «МежДелМаш ПЦ», «[[Макинтош|Деревянный макинтош]]», «СРБ9-Мишка», «Сызрань-2», «Итаник» .
 * Имеет разнообразные встроенные модули — пищалку при [[kernel panic]], поддержку различных файловых систем (в том числе несуществующих), эмулятор дверной цепочки "ip chains" и фаервол «[[Iptables|IPtroubles]]» и даже поддержку кофеварки и подставки под пиво.
+== Исходный код ядра Линупс ==
+<pre><nowiki>
+program linux;
+uses ErrorGenerator, bash;
+var login, password:string;
+begin
+  while true do
+  begin
+    write('login:');
+    readln(login);
+    writeln('password:');
+    if random(20) < 5 then
+        StartBash(login)
+    else
+        WriteLn('Login incorrect!');
+    if random(100) = 1 then KernelPanic(random(50));
+  end;
+end.
+</nowiki></pre>
 == Ссылки ==