Completar frases Días de la semana Case Of PascalVersión en línea Estructura Case Of en Pascal por Isaías A. Cuá Dubón 1 End 'Sábado' WRITELN Begin Var Writeln Program OF 7 3 End integer 4 CASE Readln WRITELN Else writeln DiasSemana_iacd ; dia : ; Writeln ( ' * * * * * INICIO DEL PROGRAMA * * * * * ' ) ; ( 'Ingrese un número entre el 1 y el 7' ) ; Readln ( dia ) ; dia 1 : ( 'Lunes' ) ; 2 : WRITELN ( 'Martes' ) ; : WRITELN ( 'Miércoles' ) ; : WRITELN ( 'Jueves' ) ; 5 : ( 'Viernes' ) ; 6 : WRITELN ( ) ; : WRITELN ( 'Domingo' ) ; Writeln ( 'El número de día ingresado no existe en la semana' ) ; ; ( ' * * * * * FIN DEL PROGRAMA * * * * * ' ) ; ( ) ; .
Crear