algoritmo Ajuda na resolução de Algoritmo

[KennanOP]

esse algoritmo está na maior parte dando tudo okay, somente na parte onde devemos escolher o banco correto que é o Bradesco (br) e o incorreto Brasil( h2)
está dando erro.
obs: A parte sublinhada corresponde ao erro.



Algoritmo "banco"

Var
a1,a2,Bradesco,BancoBrasil,br,h2: caractere
b1,b2,b3,b4: inteiro

Inicio
escreval("Informe o seu nome: ")
leia(a1)
escreval("br: Bradesco / h2:Banco do Brasil")
leia(a2)

br <-Bradesco
h2 <-BancoBrasil

se a2 <> h2 então
escreval (" Banco correto, continue ...")

se a2 = h2 então
escreval ("Banco invalido")

fimse

escreval ("Informe o numero de sua conta: ")
leia (b1)

escreval ("Informe o valor que deseja retirar: ")
leia (b2)


se b2 > 1000 então
escreval ("Valor do Saque superior ao permitido")

senao
escreval (" Favor, digite sua senha: ")
leia (b3)

fimse

b4 <- 2515

se b3 = b4 então
escreval ("Senha Correta: ",b2)

senao
escreva ("Senha incorreta, Tente novamente")
fimse

Fimalgoritmo

[gabriel227]

Ola amigo, bom testei seu código e esta tudo ok, só um pequeno erro que era do banco invalido "pois ele pedia o numero da conta mesmo sendo invalido então mudei o comando. O erro foi que o comando da frase "banco invalido" tinha que esta isolado e o resto dos comando abaixo dele juntos com o " Se e Fimse" do do banco correto.

Algoritmo "banco"

Var
a1,a2,Bradesco,BancoBrasil,br,h2: caractere
b1,b2,b3,b4: inteiro

Inicio
escreval("Informe o seu nome: ")
leia(a1)
escreval("br: Bradesco / h2:Banco do Brasil")
leia(a2)

br <-Bradesco
h2 <-BancoBrasil

// Entrada do banco, comando de posição
se a2 <> h2 então
escreval (" Banco correto, continue ...")

 escreval ("Informe o numero de sua conta: ")
leia (b1)

escreval ("Informe o valor que deseja retirar: ")
leia (b2)


se b2 > 1000 então
escreval ("Valor do Saque superior ao permitido")

senao
escreval (" Favor, digite sua senha: ")
leia (b3)

fimse

b4 <- 2515

se b3 = b4 então
escreval ("Senha Correta: ",b2)

senao
escreva ("Senha incorreta, Tente novamente")

fimse

 fimse
 //O comando a baixo é de negação, então o mesmo fica isolado
se a2 = h2 então
escreval ("Banco invalido")

fimse



Fimalgoritmo