Logica matematica exercicios

Algoritmo "tabela"
// função :
// autor : danielsilva
// data : 25/10/2013
// seção de declarações 
var
semana: vetor [0..4,0..3] de caractere
i,j: inteiro
dia_semana: inteiro
inicio
escreval("digite: ")
para i de 0 ate 4 faca
      escreval(i," para ",semana[i,0])
fimpara
leia(dia_semana)
semana[0,0]: ="segunda - feira"
semana[0,1]: ="logica de programacao"
semana[0,2]: ="19h30 as 21h"
semana[0,3]: ="médio"
semana[1,0]: ="terça-feira "
semana[1,1]: ="logica matematica"
semana[1,2]: ="21h30 as 23h"
semana[1,3]: ="dificil"
semana[2,0]: ="quarta-feira"
semana[2,1]: ="fundamentos software"
semana[2,2]: ="19h30 as 21h"
semana[2,3]: ="fácil"
semana[3,0]: ="quinta feira"
semana[3,1]: ="fundamentos de hardware"
semana[3,2]: ="21h30 as 23h"
semana[3,3]: ="fácil"
semana[4,0]: ="sexta"
semana[4,1]: ="ingles"
semana[4,2]: ="19h30 as 21h"
semana[4,3]: ="médio"

para i de 0 ate 4 faca
      se semana[dia_semana,0]=semana[i,0] entao
          escreval("data | disciplina | horário | dificuldade") 
        para j de 0 ate 3 faca
          escreva(" ",semana[i,j]," ")
        fimpara
    senao
      //   interrompa
    fimse
fimpara

fimalgoritmo​