Ir ao conteúdo
  • Cadastre-se

Erro nos codigos - pascal


esdras1997

Posts recomendados

Galera o que tem de errado nesses codigos D: ?

Program TESTESENHA ;

//VARIAVEIS
var senha : real;

Begin
//APRESENTAÇÃO

writeln('Bem vindo a calculadora pascal');

//USUARIO

writeln('Por favor digite a senha');
read(senha);
if(senha=123456) then
begin
writeln('Senha correta')
else
writeln('Senha incorreta'

end;

End.

Link para o comentário
Compartilhar em outros sites

Primeiro não tem aquele "begin" e "end" para aquele "if"...

Begin e end seriam necessários apenas para que várias instruções sejam executadas de acordo com o resultado do teste "if". E tambem a aplicação do "begin" e "end" estavam incorretos. O conjunto "begin" e "end" funcionam do mesmo modo que as chaves "{" e "}" da linguagem C.

Exemplo do uso correto do "begin" e "end":


if(variavelA > 10)then
begin
variavelB:= 2;
variavelC:= 3;
{demais operações para resultado verdadeiro do "if"}
end
else
begin
variavelB:= 4;
variavelC:= 5;
{demais operações para resultado falso do "if"}
end;

Segundo, como ficou faltando fechar o parenteses no último "writeln", pode-se receber um erro do compilador.


Program TESTESENHA ;

//VARIAVEIS
var senha : real;

Begin
//APRESENTAÇÃO

writeln('Bem vindo a calculadora pascal');

//USUARIO

writeln('Por favor digite a senha');
read(senha);
if(senha=123456) then
[COLOR="Red"][B]//begin[/B][/COLOR]
writeln('Senha correta')
else
writeln('Senha incorreta'[COLOR="Red"][B]);[/B][/COLOR]

[COLOR="Red"][B]//end;[/B][/COLOR]

End.

Link para o comentário
Compartilhar em outros sites

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

Sobre o Clube do Hardware

No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas comunidades sobre tecnologia do Brasil. Leia mais

Direitos autorais

Não permitimos a cópia ou reprodução do conteúdo do nosso site, fórum, newsletters e redes sociais, mesmo citando-se a fonte. Leia mais

×
×
  • Criar novo...

APRENDA TUDO SOBRE HARDWARE!

HARDWARE 2022

 

CLIQUE AQUI E BAIXE AGORA MESMO!