Editing FOCAL (programming language) (section)

====FOR====
The {{code|FOR}} command (abbreviation F) implements a [[for loop]]. When three arguments are specified, the first is the initial value of the loop variable, the second is the increment, and the third value is the terminating value for the loop. If only two values are provided, the first is the initial value and the second is the terminating value, and the increment is set to 1. This is the pattern from [[FORTRAN]]'s {{code|DO}} loops, as opposed to BASIC's {{code|FOR}} where the increment is the last value, if present.

In contrast to other parts of the language where multiple statements on a line are independent, the {{code|FOR}} always runs the statements that follow it on the line before the termination has been met, and then continues to the next line. Thus, loops have to be on a single line, or alternatively, call a subroutine with {{code|DO}}. There is no equivalent of BASIC's {{code|NEXT}}.{{sfn|Manual|1968|p=3.7}}
 01.01 FOR X=1,10; TYPE X,!
 01.02 FOR X=0,10,100; DO 2

A sample FOR loop:
 01.10 ASK "HOW MUCH MONEY DO YOU WANT TO BORROW ?",PRINCIPAL
 01.20 ASK "FOR HOW MANY YEARS ?",TERM
 01.30 FOR RATE=4.0,.5,10;DO 2.0
 01.40 QUIT
 02.10 SET INTEREST=PRINCIPAL*(RATE/100)*TERM
 02.20 TYPE "RATE",RATE,"   ","INTEREST",INTEREST,!