File: for.yab

package info (click to toggle)
yabasic 1%3A2.90.3-1
  • links: PTS, VCS
  • area: main
  • in suites: bookworm
  • size: 4,104 kB
  • sloc: ansic: 12,214; sh: 4,417; makefile: 21
file content (18 lines) | stat: -rwxr-xr-x 230 bytes parent folder | download | duplicates (4) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
 
for i = 0.2 to 5
  print i
next i
if i <> 5.2 error "fractional"

for i = -5 to 5
  print i
next i
if i <> 6 error "single"

k = 0
for i = 1 to 2
  for j = 2 to 4
    k = k + 1
    print k
  next j
next i
if k <> 6 error "nested"