projects
/
platform
/
framework
/
web
/
lwnode.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
b96901530c24fac8afd326d68c5317f5a40ec953
[platform/framework/web/lwnode.git]
/
1
5 PRINT "X VALUE", "SINE", "RESOLUTION"
2
10 READ D
3
20 LET M = -1
4
30 FOR X = 0 TO 3 STEP D
5
40 IF SIN(X) <= M THEN 80
6
50 LET X0 = X
7
60 LET M = SIN(X)
8
80 NEXT X
9
85 PRINT X0, M, D
10
90 GOTO 10
11
100 DATA .1, .01, .001
12
110 END