mirror of
https://gitee.com/zlgopen/awtk.git
synced 2024-12-04 13:07:40 +08:00
14 lines
114 B
Forth
14 lines
114 B
Forth
|
a=0
|
||
|
|
b=0
|
||
|
|
|
||
|
|
while(a < 100) {
|
||
|
|
a=a+1
|
||
|
|
if((a < 20) || (a > 50)) {
|
||
|
|
continue
|
||
|
|
}
|
||
|
|
b=b+a
|
||
|
|
print(a, b)
|
||
|
|
}
|
||
|
|
print(b)
|
||
|
|
|