Primeira TT Reserva 02

Esta é uma pré-visualização de arquivo. Entre para ver o arquivo original

Algoritmo "Calcular"
var
a,b,c,d,x :logico
inicio
a := falso;
b := falso;
c := verdadeiro
d := verdadeiro
x:= (a ou b)
escreval ("I",x)
x:= (a ou c) e (b ou d)
escreval ("II",x)
x:= (a e b) e (nao c)
escreval ("III",x)
x:= (nao a) ou (nao b e nao d) e c
escreval ("IV",x)
fimalgoritmo