Wie lasse ich Gerichtsurteile automatisch fällen ? ... Der PC kann's

21/03/2013 - 13:12 von D Orbital | Report spam
for t=0 to 1000 : restore 10
10 Data Anna,Claudia,Bertha,Dorothea,Haare geschnitten,Jacke gewaschen,Wimpern getuscht,Schuhe geputzt
a=int(rnd*3):a2=int(rnd*3):b=int(rnd*3):b2=int(rnd*3)
for r=0 to a
read aa :next
restore 10
for r=0 to a2
read aaa :next
if aaa=aa then read aaa
restore 10
for r=0 to 3:read d:next
for r=0 to b
read bb:next:restore 10
for r=0 to 3:read d:next
for r=0 to b2
read bbb:next
if bbb=bb then read bbb
restore 10
?" DASS ";aa;" DER ";aaa;" DIE ";bb;" HAT "
?" UND DANN AUCH NOCH DIE ";bbb;" HAT, UND"
for rrr=0 to 100 :next:next
 

Lesen sie die antworten

#1 Gregor Scholten
24/03/2013 - 01:04 | Warnen spam
Am 21.03.2013 13:12, schrieb D Orbital:
[Quellcode]



was'n das für ne Programmiersprache? Irgendwas BASICes?

Ähnliche fragen