10 CLS
20 rz = 1: ivl = 0: lz = 6
30 a = 1: b = 2: c = 4: d = 6: e = 5
40 PRINT ivl
50 iv = lz - ivl: aa = aa + 1: PRINT aa
55 IF iv < 2 THEN GOTO 120
60 IF a = iv OR b = iv OR c = iv OR d = iv OR e = iv THEN 50
57 IF iv <> a OR iv <> b OR iv <> c OR iv <> d OR iv <> e THEN 100
100 ivl = ivl + 1 ...
Search found 1 match
- Tue May 01, 2007 11:59 am
- Forum: Rund um QBasic und QuickBasic
- Topic: hab ein Problem mit if then warum geht das nicht?
- Replies: 0
- Views: 4776