Cercanías X40763

El jefe de la estación de Sants ha diseñado un sistema para distribuir las llegadas de los trenes de cercanı́as entre las diferentes vı́as de la estación. Hay cuatro lı́neas de cercanı́as 1, 2, 3 y 4 y dos posibles sentidos, ”N” (norte) y ”S” (sur). Las reglas de distribución son las siguientes. A la lı́nea 1 sentido norte le corresponde la vı́a 8 y sentido sur la vı́a 7. Para la lı́nea 2 corresponden las vı́as 10 (norte) y 9 (sur). Las vı́as de la lı́nea 3 son 12 y 13 (norte y sur repectivamente). Por último a la lı́nea 4 le corresponden las vı́as 14 (norte) y 15 (sur). Diseñad la función @cercanias(linea,sentido)@ que reciba como parámetros un valor $linea$ entero positivo que representa la lı́nea de cercanı́as y un caracter $sentido$ que indique el sentido (”N” para norte y ”S” para sur) y devuelva el número de vı́a correspondiente. En caso de que la lı́nea o el sentido no sean válidos, ha de devolver un 0.

Ejemplo de sessión