One of the first Fortran programs.
The following program, written by Backus, is taken from the programmer's FORTRAN manual. The program reads N numbers and calculates the maximum.
FREQUENCY 30 (2,1,10), 5(100)
READ 1, N, (A(I), I = 1,N)
1 FORMAT (I3/(12F6.2))
BIGA = A(1)
5 DO 20 I = 2,N
30 IF (BIGA-A((I)) 10,20,20
10 BIGA = A(I)
PRINT 2, N, BIGA
2 FORMAT (22H1THE LARGEST OF THESE NUMBERS IS F7.2)
I was seeking for Fortran(For transaction)language since months ago, it's similar to microprocessor language.