Aula18-Pascal

Prévia do material em texto

Estágio de Docência 
Douglas F. Toledo 
Mestrando em Ciência da Computação 
DIN - UEM 
Sub-rotinas 
Programação Modularizada 
Conceitualizando 
• Blocos de instruções que realizam tarefas específicas; 
 
• Vantagens: 
• Chamadas ilimitadas; 
• Programas menores; 
• Código mais organizado; 
 
• Cuidados: 
• Tipos de variáveis; 
• Desvio na execução do programa; 
 
Conceitualizando 
• Dois tipos: 
• Procedimentos (PROCEDURE); 
• Funções (FUNCTION); 
 
• Duas abordagens: 
• Sem passagem de parâmetros; 
• Com passagem de parâmetros; 
 
Exemplo 
PROGRAM <nome_programa> ; 
 VAR <nome_variável> : <tipo_variável> ; 
 
 PROCEDURE <nome_procedure>; 
 VAR <declaração_variáveis_procedure> 
 BEGIN 
 <comandos_procedure> ; 
 END; 
 
 FUNCTION <nome_função> : <tipo_retornado> ; 
 VAR <declaração_variáveis_função> ; 
 BEGIN 
 <comandos_função> ; 
 <nome_função> := <valor_retornado> ; 
 END; 
 
BEGIN { Programa Principal } 
 <comandos> ; 
 <nome_procedure>; 
 <nome_variavel> := <nome_função> 
END. 
SEM PASSAGEM DE PARÂMETROS 
Procedimentos e Funções 
Procedimento 
PROCEDURE <nome_procedure>; 
 
{Declaração de variáveis locais} 
 
BEGIN 
 {comandos} 
END; 
______________________________________________ 
{No programa principal} 
<nome_procedure> 
Procedimento 
Exercício 1: Faça um procedimento que exiba na tela 
todos os números pares no intervalo de 0 a 799. 
 
Dica: use a função aritmética MOD 
Procedimento 
 
Função 
FUNCTION <nome_função> : <tipo_dado_retorno> 
 
{Declaração de variáveis locais} 
 
BEGIN 
 {comandos} 
 <nome_função> := <valor_retornado> 
END; 
______________________________________________ 
{No programa principal} 
<variável> := <nome_função> 
 
Função 
Exercício 2: Faça uma função que retorne a quantidade 
de números pares existentes entre 0 e 799. 
 
Dica: mesmo raciocínio do Exercício 1 
Função 
Desafio 
Exercício 3: Faça uma sub-rotina para verificar quantos 
anos bissextos existirão entre 2014 e 2100. E que exiba 
os anos considerados bissextos. 
 
Dica: Um ano bissexto é divisível por 4, mas não por 100, 
ou então é divisível por 400. 
 
Exemplo: 1988 é bissexto pois é divisível por 4 e não é 
por 100; 2000 é bissexto porque é divisível por 400. 
Desafio 
Desafio 
Desafio 
Exercício 4: Faca um programa que imprima a serie de 
Fibonacci = (0,1,1,2,3,5,8,13,...) enquanto o termo a ser 
impresso for menor que 500. 
 
Dica: cada elemento, a partir do terceiro, é obtido 
somando-se os dois anteriores. 
 
 
 
 
Exemplo: 1+1=2, 2+1=3, 3+2=5 e assim por diante. 
Desafio 
Obrigado 
• Próxima aula: 
• Procedimentos com passagem de parâmetros; 
• Funções com passagem de parâmetros;