Elaborar um algoritmo que mostre a tabela-verdade, como não sei pois estou no inicio da faculdade e isso vale um nota boa e estou tentando ao maximo fazer, mas sinceramente nao estou conseguindo pq meu professor de algoritmo não ensina m***** nem uma! 
Se alguem poder me ajudar fico grato.

achei isso pelo forum: 
var
p1:vetor[1..16] de inteiro
p2:vetor[1..16] de inteiro
p3:vetor[1..16] de inteiro
p4:vetor[1..16]de inteiro
i:inteiro
inicio

p1[1]<-1, p2[1]<-1, p3[1]<-1, p4[1]<-1
p1[2]<-1, p2[2]<-1, p3[2]<-1, p4[2]<-0
p1[4]<-1, p2[3]<-1, p3[3]<-0, p4[3]<-1
p1[3]<-1, p2[4]<-0, p3[4]<-1, p4[1]<-1
p1[5]<-0, p2[5]<-1, p3[5]<-1, p4[5]<-1
p1[6]<-0, p2[6]<-0, p3[6]<-0, p4[6]<-1
p1[7]<-0, p2[7]<-0, p3[7]<-1, p4[7]<-0
p1[8]<-0, p2[8]<-1, p3[8]<-0, p4[8]<-0
p1[9]<-1, p2[9]<-0, p3[9]<-0, p4[9]<-0
p1[10]<-0, p2[10]<-0, p3[10]<-0, p4[10]<-0
p1[11]<-1, p2[11]<-1, p3[11]<-0, p4[11]<-0
p1[12]<-0, p2[12]<-0, p3[12]<-1, p4[12]<-1
p1[13]<-1, p2[13]<-0, p3[13]<-0, p4[13]<-1
p1[14]<-0, p2[14]<-1, p3[14]<-1, p4[14]<-0
p1[15]<-1, p2[15]<-0, p3[15]<-1, p4[15]<-0
p1[16]<-0, p2[16]<-1, p3[16]<-0, p4[16]<-1

para i de 1 ate 16 faca
Escreval (p1," | ",p2," | ",p3," | ",p4," | ")
fimpara

mas nao consegui continuar