function saida = questao16(operador)
rna = perceptron; %cria o perceptron
entradatreino = [0 0 1 1; 0 1 0 1];
if operador == 1
    [rna,tr] = train(rna,entradatreino,[0 0 0 1]);%and
elseif operador == 2
    [rna,tr] = train(rna,entradatreino,[0 1 1 1]);%or
elseif operador == 3
    [rna,tr] = train(rna,entradatreino,[1 1 0 1]);%->
elseif operador == 4
    [rna,tr] = train(rna,entradatreino,[1 1 1 0]);%nand
elseif operador == 5
    [rna,tr] = train(rna,entradatreino,[1 0 0 0]);%nor
end
plotperform(tr);
disp(tr.best_perf)
x1=1;
x2=1;
while (x1==1 || x1==0) && (x2==0 || x2==1)
x1 = input('defina x1 e em seguida x2; valores diferentes de 0 ou 1 saem do programa\nx1= ');
x2 = input('x2= ');
display(rna([x1;x2]))
end
saida=1;
end