>

Fórum

Fórum da RL System, voltado para analistas, programadores etc. Tudo sobre linguagem de programação e desenvolvimento Full Stack: Banco de Dados, Android, C#, Java, .NET, PHP, Node, Javascript, TypeScript, Front, HTML e muito mais.



Não sei usar o sinal de != (diferença) no pascal!


Olá, tudo bem?

Program Pzim ;

     var 

     nome: string;

     senha: integer;

     

     

Begin

writeln('__Bem Vindo!__');

writeln('________________________');

writeln('Digite sua senha!');

senha:= integer;

readln(senha);

if  senha != senha then

Begin

writeln('Senha correta!');

writeln('Aproveite a sua calculadora.');

end

Else

Begin

writeln('Erro, tente novament!');

End;

  

End.


este foi o programa que eu tentei contra por conta , mas o if , não apresenta writeln'Erro' quando o usuário digita caracteres diferente do exigido pelo o sist.

Como devo fazer?



3 Respostas


para diferente usa o <> nao !=




Program Pzim ;


     var 


     nome: string;


     senha: integer;


     


     


Begin


 writeln(\'__Bem Vindo!__\');


 writeln(\'________________________\');


 writeln(\'Digite sua senha!\');


 readln(senha);


 if  senha <> senha then


 Begin


 writeln(\'Senha correta!\');


 writeln(\'Aproveite a sua calculadora.\');


 end 


 Else


 Begin


 writeln(\'Erro, tente novament!\');


 


 End; 


  


End.




Muito obrigado ??