1583d33c593896afeb8486a25fabfcf6e9dc9ca75Enrico Granata5 PRINT "X VALUE", "SINE", "RESOLUTION" 2583d33c593896afeb8486a25fabfcf6e9dc9ca75Enrico Granata10 READ D 3583d33c593896afeb8486a25fabfcf6e9dc9ca75Enrico Granata20 LET M = -1 4583d33c593896afeb8486a25fabfcf6e9dc9ca75Enrico Granata30 FOR X = 0 TO 3 STEP D 5583d33c593896afeb8486a25fabfcf6e9dc9ca75Enrico Granata40 IF SIN(X) <= M THEN 80 6583d33c593896afeb8486a25fabfcf6e9dc9ca75Enrico Granata50 LET X0 = X 7583d33c593896afeb8486a25fabfcf6e9dc9ca75Enrico Granata60 LET M = SIN(X) 8583d33c593896afeb8486a25fabfcf6e9dc9ca75Enrico Granata80 NEXT X 9583d33c593896afeb8486a25fabfcf6e9dc9ca75Enrico Granata85 PRINT X0, M, D 10583d33c593896afeb8486a25fabfcf6e9dc9ca75Enrico Granata90 GOTO 10 11583d33c593896afeb8486a25fabfcf6e9dc9ca75Enrico Granata100 DATA .1, .01, .001 12583d33c593896afeb8486a25fabfcf6e9dc9ca75Enrico Granata110 END 13