Desvio condicional
2 participantes
SkiLL-World :: Geral :: Pascal
Página 1 de 1
Desvio condicional
Muitas vezes, deseja-se que o programa faça algo que dependa (assim como no caso dos loops) de certa inspeção. O comando utilizado com este propósito é o If <condição> then <ação> else <ação>. Caso (condição) seja verdadeira, o programa executara a linha abaixo de then. Para que se execute um conjunto de instruções, deve-se novamente delimitá-las com os comandos begin e end. Há tambem a estrutura case <expressao ou valor> of <opções> , que é mais utilizada na criação de menu de opções. Deteremo-nos a análise do if ... then ... else
Listagem 9.1
program imprimir_usando_loop;
uses crt;
var palavra:string[3];
begin
clrscr;
writeln('Digite sim ou não');
realn(palavra);
if palavra= 'sim' then
begin
writeln('Você digitou sim');
writeln('Pressione qualquer tecla para continuar');
end
else
begin
writeln('Você digitou não');
writeln('Pressione qualquer tecla para continuar');
end;
readkey;
end.
! Atenção: O comando imediatamente anterior à palavra reserva else não deve conter ponto e vírgula ( ; ) .
Listagem 9.1
program imprimir_usando_loop;
uses crt;
var palavra:string[3];
begin
clrscr;
writeln('Digite sim ou não');
realn(palavra);
if palavra= 'sim' then
begin
writeln('Você digitou sim');
writeln('Pressione qualquer tecla para continuar');
end
else
begin
writeln('Você digitou não');
writeln('Pressione qualquer tecla para continuar');
end;
readkey;
end.
! Atenção: O comando imediatamente anterior à palavra reserva else não deve conter ponto e vírgula ( ; ) .
SkiLL-World :: Geral :: Pascal
Página 1 de 1
Permissões neste sub-fórum
Não podes responder a tópicos
|
|