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 Program 4 End OF End Var Writeln 3 WRITELN CASE Begin Else writeln Readln integer 7 WRITELN 'Sábado' 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