05 Modularizacao 2Funcoes 1

MODULARIZAÇÃO
• Existem dois tipos de sub-programas
– Procedures (procedimentos). Não retorna valores
– Functions (funçöes).

Retorna valores

Exemplo de MODULARIZAÇÃO
Program <nome_programa>;
Var <declaração de variáveis>
Procedures <nome_da_procedure> begin <comandos>; end; Functions <nome_da_funcao> begin <comandos>; end; BEGIN
<comandos>;
<chamada da Procedure declarada acima>;
<comandos>;
<chamada da Function declarada acima>;
<comandos>;
END.

Sub-programa 1

Sub-programa 2

Programa
Principal

Function (Função)
Definição:
• As funções são muito parecida com as procedures, praticamente a mesma estrutura.
• A principal diferença é que uma função pode retornar um valor para o programa principal. Function (Função)

Forma Padrão:
Function <nome_função>
(parâmetros : tipo_parâmetros) : tipo_retorno;
Var <nomes das variáveis locais>;
Begin
<Comandos a serem executados>;
End;

(opcional)

Program Exemplo_6;

Função
MEDIA

Var x, y : Real; (* variáveis globais *) Function MEDIA ( a , b : real ) : real;
Var M : real; (* variável local *)
Begin
M := ( (a+b) / 2 );
Media := M;
End;

BEGIN x:=Media(8,12); y:=Media(7.0 , 5.0) - Media(5.5 , 4.5);
Writeln( x );
Writeln( y );
END.

EXEMPLO de Função
Program Exemplo7;
Var x, y : Real;
Function Soma(a,b:real):real;
Begin
Soma:=a+b;
End;
BEGIN
Write(‘Entre com valor de x --> ');
Write('Entre com valor de y --> ');
Writeln(Soma(x, y));
END.

Readln(x);
Readln(y);

EXEMPLO de Função
Program Exemplo8;
Var m : Real; sx : char; nome : string[80]; Function Soma (m:real; sx: char; nome:string) : real;
Begin
Writeln(nome, sx);
Soma:=m + 2.0;
End;
BEGIN
Write(‘Entre com a media --> ');
Write('Entre com Sexo ---------> ');
Write('Entre com nome---------> ');
Writeln( Soma(m, sx, nome) );
END.

Readln(m);
Readln(sx);
Readln(nome);

Função com passagem de Parâmetro
Por valor
Por referência
Segue as mesmas regras vistas com procedures

Exemplo de um programa
MODULARIZADO (em módulos)
Exemplo

Faça um programa em Pascal para