home *** CD-ROM | disk | FTP | other *** search
- 10 CLS: INPUT "FREQUENCY IN MHZ"; F
- 20 WL=3E+08*3.28/(F*1E+06)
- 30 PRINT "WAVELENGTH IN FT"; WL
- 40 PRINT: INPUT "DO YOU WANT HARD COPY (Y/N)"; Q$
- 50 IF Q$="Y" THEN LPRINT "FREQ"; F, "WAVELENGTH"; WL
- 60 PRINT: INPUT "WANT TO END (Y/N)"; Q$
- 70 IF Q$="Y" THEN END ELSE GOTO 10
-