Baixe o app para aproveitar ainda mais
Esta é uma pré-visualização de arquivo. Entre para ver o arquivo original
Algoritmo 2 ou 1 Var A , C , P :inteiro Inicio A <- 0 C <- 0 P <- 0 Enquanto (A < 1) e ( A > 2) Faça Escreva ("Andre escreva um numero 2 ou 1 ") Leia A Fim_enquanto Enquanto (C < 1) e ( C > 2) Faça Escreva ("Andre escreva um numero 2 ou 1 ") Leia C Fim_enquanto Enquanto (P < 1) e ( P > 2) Faça Escreva ("Andre escreva um numero 2 ou 1 ") Leia P Fim_enquanto Se (A = C) e (A = P) Então Escreva ("Ninguem ganhou : X") Senão Se (A = 1) e (C = 1) e (P = 2) Então Escreva ("Ganhador é P") Senão Se (A = 1) e (C = 2) e (P = 1) Então Escreva ("Ganhador é C") Senão Se (A = 1) e (C = 2) e (P = 2) Então Escreva ("Ganhador é A") Senão Se (A = 2) e (C = 1) e (P = 1) Então Escreva ("Ganhador é A") Senão Se (A = 2) e (C = 1) e (P = 2) Então Escreva ("Ganhador é C") Senão Se (A = 2) e (C = 2) e (P = 1) Então Escreva ("Ganhador é P") Fim_se Fim_se Fim_se Fim_se Fim_se Fim_se Fim
Compartilhar