llucas74

Funcionou perfeitamente dessa forma, muito obrigado :-) Minha duvida agora é o seguinte: Como colocar duas condições ou mais no mesmo IF. para o sistema reconhecer por exemplo: verao e verão. ou outono e Outono. tentei colocar virgula e tal, mas nao deu certo.

Galera...Acompanhei os vídeos sobre logica de programação do canal RBtech, como ele ensina no VisuAlg fiz meus primeiros algoritmos nele. Agora estou tentando fazer no Pascal uns algoritmos que aprendi no VisuAlg e estou com dificuldades. O Primeiro algoritmo é assim: Ele escreve na tela: "Digite uma estação do ano". e pra cada estação escolhida você recebe uma frase diferente. Segue o algoritmo: program Estacoes_do_ano; var estacao:string; Begin write ('Digite uma estação do ano: '); read (estacao); if estacao = 'outono' then writeln ('Passeie no Bosque!!!'); if estacao = 'inverno' then writeln ('Agasalhe-se bem!!!'); if estacao = 'primavera' then writeln ('Aprecie seu Jardim!!!'); if estacao = 'verao' then writeln ('Cuidado com o sol!!!') else write ('verifique o que vc digitou'); End. se eu escrevo verão, aparece a frase correta. Mas quando escrevo qualquer outra estação aparece a frase correspondente + a "verifique o que você digitou". Queria colocar também duas opções para verão, com e sem acento (verao, verão), mas não estou conseguindo.