Download Programando com Pascal - Instituto de Computação

end;
{programa principal}
begin
write('Digite os três números');
readln(x, y, z);
writeln('Valores dados: x = ', x:0:2, ', y = ', y:0:2, ' e z = ', z:0:2);
if (x > y) or (x > z)
then
if y > z
then
Troca(x, z)
else
Troca(x, y);
if y > z
then
Troca(y, z);
writeln('Valores dados, agora ordenados: x = ', x:0:2, ', y = ', y:0:2, 'e z = ', z:0:2);
end.
Observe que a ativação de um procedimento é feita com a simples referência ao seu identificador junto
com os argumentos com os quais se pretende que ele seja executado. Observe também que, através de um
comentário, indicamos o objetivo do procedimento. Esta é uma prática que deve ser adotada por todo
programador, pois facilita sobremaneira a leitura do programa.
2. Um programa com objetivos múltiplos deve oferecer uma tela com as tarefas que ele pode realizar
para que o usuário escolha qual delas ele deseja. Uma tela com este objetivo é comumente chamada de menu
de opções e funciona como uma interface entre o programa e o usuário.
Um menu de opções pode ser obtido através de um procedimento sem parâmetros. Por exemplo, um
programa para gerenciar as contas correntes de uma banco pode conter o seguinte procedimento:
procedure Menu;
begin
writeln('1 - Saldo');
writeln('2 - Extrato');
writeln('3 – Aplicação e resgate');
writeln('4 - Depósitos');
writeln('5 - Saques');
write('
Digite sua opção : ');
readln(Opcao);
end;
Naturalmente, o programa principal seria iniciado com a chamada deste procedimento, seguido de um
comando case para, de acordo com a opção escolhida, executar a tarefa pretendida. Neste caso, a variável
Opção deveria ser uma variável global.
Cabe relembrar o que foi dito na seção 3.7: com o surgimento das linguagens visuais (VisualBasic,
Delphi e outras), atualmente os menus de opções são disponibilizados através de interfaces gráficas
contendo botões, banners e outros elementos e as ativações dos subprogramas que executam a tarefa
pretendida são feitas através de mouses ou mesmo através de toque manual na tela do computador. A unit
Graph contém funções e procedimentos predefinidos que permitem que interfaces gráficas sejam criadas em
Pascal, porém o estudo destas subrotinas não está no escopo deste livro.
3. Os comandos de entrada e de saída, readln e writeln, são, na verdade, procedimentos predefinidos do
sistema. O comando readln, por exemplo, possui um conjunto de parâmetros, cujo número de elementos não
é prefixado, podendo até ser um conjunto vazio, situação na qual necessita apenas da digitação da tecla
<Enter> para sua execução. Por seu turno, o procedimento writeln pode receber como argumentos
identificadores de variáveis, expressões, mensagens e até, como veremos no capítulo 10 (dez), arquivos. Do
mesmo modo que o comando readln, o conjunto de parâmetros do comando writeln pode ser vazio, quando,
neste caso, sua execução implica a mudança do cursor para a linha seguinte.