Startseite Themenabende Mailingliste Pläne Links GnuPG-Schlüssel

"if"-Statement

Verletzungsprogramme

#!/bin/bash

if `test \`echo "1274097 % 10" |bc\`=7`;then echo This is patented!; fi
  

program EP1274097;

var Data: Integer;

begin
  Data := 1274097;   { Data }

  { if, and only if the verification is True,
  do the following action }
  if Data Mod 10 = 7 then                  { Anspruch 1 }
    WriteLn ('Patent number: ', Data)      { Anspruch 1,3 }
  else                                     { Anspruch 2 }
    WriteLn ('Manipulation')               { Anspruch 4 }
end.

Das Patent mit der Nummer 1274097 beschreibt ein Programm, welches Prüfdaten im Speicher ablegt. Nur, wenn diese Prüfdaten zur Laufzeit korrekt sind, wird ein zugehöriger Programmabschnitt ausgeführt, sonst wird auf eine Manipulation der Daten geschlossen.

Übersicht Sieger-Patente

Startseite Themenabende Mailingliste Pläne Links GnuPG-Schlüssel