Ir para o conteúdo
perez

[Resolvido]Duvida num If pascal

Mensagens Recomendadas

perez    1
perez

Boas, hoje surgiu-me esta duvida:

eu tenho este programa:

Program Exemplo;
uses crt;
var
x:string[40];
Begin
     ClrScr;
     WriteLn('Palavra de honra??');
     ReadLn(x);
     ClrScr;
     If x = 'Programador' then WriteLn('Tu és Programador ')            <-|
     Else WriteLn('Tu não és programador');
     ReadKey;
End.

como é que faço para no If apontado pela seta se o user escrever 'programador' sem o primeiro 'P' maiúsculo ele também aceite?

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites
softklin    12
softklin

Na condição do teu if, incluis mais um elemento, com a respectiva palavra em minúscula, através da expressão 'Or', que significa 'ou'. Fica algo do género:

If x = 'Programador' Or x = 'programador' then WriteLn('Tu és Programador ')

Ao usares o operador Or na condição do if, estás a indicar que pretendes imprimir "Tu és programador", se x for igual a 'Programador' ou se x for igual a 'programador' (disjunção lógica), ou seja, basta uma condição ser verdadeira.

A propósito, também existe o operador 'And', que significa 'e' (um e outro), que exige que ambas as condições sejam verdadeiras para entrar no if (conjunção lógica).

Fica aqui para veres uns exemplos um texto do Wikilivros:

http://pt.wikibooks.org/wiki/Pascal/Estrutura_Condicional

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites
softklin    12
softklin

Já não programo à Pascal faz anos, por isso penso que seja por falta de parêntesis, segundo a wikilivros a lógica está correcta. Tenta:

If ((x = 'Programador') Or (x = 'programador')) then WriteLn('Tu és Programador ')

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!

Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.

Entrar Agora


×

Aviso Sobre Cookies

Ao usar este site você aceita os nossos Termos de Uso e Política de Privacidade