Ejemplo 2: Sinclair BASIC