1820 PRINT " ";J;" - ";TC$(J);TAB(18); : INPUT " = ",A$