Gente me ajuda ai n consigo achar o erro
var nome:vetor[1..2] de caractere v:vetor[1..3,1..3]de caractere ctr:caractere i,j,c,cont1,cont2,coluna,linha,controd,a,b:inteiro inicio escreval ("Jogo da velha ") escreval para i de 1 ate 2 faca escreval ("Digite o Nome do",i,"° Jogador") leia (nome[i]) fimpara i<-0 para i de 1 ate 3 faca para j de 1 ate 3 faca v[i,j]<-"¨" fimpara fimpara i<-0 enquanto (i<1)faca i<-randi(3) se (i=0) então i<-randi(3) fimse fimenquanto se (i=1) então escreval (nome[1]," Jogador 1 Começa *") senao escreval (nome[2]," Jogador 2 Começa *") fimse escreval (" | | ") escreval (" 1,1 | 1,2 | 1,3 ") escreval (" | | ") escreval (" ___________|__________|__________ ") escreval (" | | ") escreval (" 2,1 | 2,2 | 2,3 ") escreval (" | | ") escreval (" ___________|__________|__________ ") escreval (" | | ") escreval (" 3,1 | 3,2 | 3,3 ") escreval (" | | ") escreval (" | | ") escreval enquanto c<>9 faca enquanto j<>1 faca para i de 1 ate 2 faca escreval ("Jogador ",i," Insira 1 o lugar.") leia (a) escreval ("jogador ",i," Insira a o 2 lugar.") leia ( se (v[a,b]="X") ou (v[a,b]="O") então escreval ("Ja esta sendo usado") escreval ("Outra posição") senao se (i=1)então v[a,b]<-"X" j<-j+1 c<-c+1 senao se (i=2) então v[a,b]<-"O" j<-j+1 c<-c+1 fimse fimse fimse escreval (" | | ") escreval (" ",v[1,1]," | ",v[1,2]," | ",v[1,3]," ") escreval (" | | ") escreval (" ___________|__________|__________ ") escreval (" | | ") escreval (" ",v[2,1]," | ",v[2,2]," | ",v[2,3]," ") escreval (" | | ") escreval (" ___________|__________|__________ ") escreval (" | | ") escreval (" ",v[3,1]," | ",v[3,2]," | ",v[3,3]," ") escreval (" | | ") escreval (" | | ") escreval Se (v[1,1]) e (v[2,2]) e (v[3,3]) = "X" então escreva("X VENCEU") fimalgoritmo senao Se (v[3,1]) e (v[2,2]) e (v[1,3]) = "X" então escreva("X VENCEU") fimalgoritmo senao Se (v[1,1]) e (v[1,2]) e (v[1,3]) = "X" então escreva("X VENCEU") fimalgoritmo senao Se (v[2,1]) e (v[2,2]) e (v[2,3]) = "X" então escreva("X VENCEU") fimalgoritmo senao Se (v[3,1]) e (v[3,2]) e (v[3,3]) = "X" então escreva("X VENCEU") fimalgoritmo senao Se (v[1,1]) e (v[2,1]) e (v[3,1]) = "X" então escreva("X VENCEU") fimalgoritmo senao Se (v[1,2]) e (v[2,2]) e (v[3,2]) = "X" então escreva("X VENCEU") fimalgoritmo senao Se (v[1,3]) e (v[2,3]) e (v[3,3]) = "X" então escreva("X VENCEU") fimalgoritmo senao Se (v[1,1]) e (v[2,2]) e (v[3,3]) = "O" então escreva("O VENCEU") fimalgoritmo senao Se (v[3,1]) e (v[2,2]) e (v[1,3]) = "O" então escreva("O VENCEU") fimalgoritmo senao Se (v[1,1]) e (v[1,2]) e (v[1,3]) = "O" então escreva("O VENCEU") fimalgoritmo senao Se (v[2,1]) e (v[2,2]) e (v[2,3]) = "O" então escreva("O VENCEU") fimalgoritmo senao Se (v[3,1]) e (v[3,2]) e (v[3,3]) = "O" então escreva("O VENCEU") fimalgoritmo senao Se (v[1,1]) e (v[2,1]) e (v[3,1]) = "O" então escreva("O VENCEU") fimalgoritmo senao Se (v[1,2]) e (v[2,2]) e (v[3,2]) = "O" então escreva("O VENCEU") fimalgoritmo senao Se (v[1,3]) e (v[2,3]) e (v[3,3]) = "O" então escreva("O VENCEU") fimalgoritmo senao se j=9 então escreva("DEU VELHA") fimse fimse fimse fimse fimse fimse fimse fimse fimse fimse fimse fimse fimse fimse fimse fimse fimse fimpara fimenquanto fimenquanto fimalgoritmo
Fazendo no Visualg
Luiz Gustavo Miranda
Ajuda ai é urgente preciso ate a noite isso D;