Var A= caractere

Algoritmo
Escreva ("Bem vindo/a ao meu perfil")
Leia (A)
Se A = Obrigado ou Obrigada
Escreval (" :D ")
Senao
Escreval ("SUMA DAQUI")
Fimse
Fimalgoritmo