10  CLS
20  PRINT "Tast inn 5 navn p† Amstrad-eiere..."
30  DIM B$(5)
40  FOR N = 1 TO 5
50  PRINT
60  PRINT "Eier"; N;
65  INPUT B$(N)
70  NEXT
80  PRINT "S† dumt av dere, ";
90  FOR N = 1 TO 5
100 PRINT B$(N); ", ";
110 NEXT
120 PRINT "† kj›pe en Amstrad CPC 464."