1 criando funçao no pascal e delphi Qua Abr 17, 2013 7:45 pm
Moedas : 201
Mensagens : 92
Humor : *-*
Reputação : 5
Mensagens : 92
Humor : *-*
Reputação : 5
hacker fts315
funçoes sao algoritimos prontos q permite fazer a mesma coisa varias vezes por exemplo vc criar um algoritimo q faz uma soma com uma variavel, entao vc tem q fazer esse mesmo algoritimo com dezenas de variaveis para nao precisar fazer o mesmo algoritimo vc cria uma funçao, veja um exemplo de programa sem funçao
na minha source acima ele cria 3 variaveis x,fts,resu a variavel x recebe 15, a variavel fts recebe 300, e a variavel resu recebe a soma da variavel x e fts, se agente tivesse q fazer o mesmo algoritimo so q mudando a variavel x veja um exemplo
para facilitar agente poderia criar uma funçao, tipo veja como ficaria a nossa source usando uma funçao
a vantagem de criar funçao q vc pode pegar apenas ela e colocar em outras source, agora vamos ensinar a criar uma, para criar uma funçao vc tem q declarar ela usando o comando function depois vc escreve um nome para ela no meu exemplo ela se chama func abre depois abre e fecha parenteses dentro dele vai ser passado um argumento, depois vc tem q colocar o tipo de retorno dele no meu exemplo ele retorna um valor inteiro, veja outro exemplo
o argumento e o valor de entrada e o retorno o valor de saida, logo depois q va declarar ela basta usar o begin e end; para agente escreve nossa funçao veja outro exemplo
para ter o retorno agente atribui o valor de retorno ao propria funçao no nosso caso agente vai atribuir ao hack
para chamar a funçao basta usar o nome dela e abre fecha paretenses, nosso exemplo seria hack(), algumas vezes vc pode querer q o valor de retorno de uma funçao seja atribuido a uma variavel veja um exemplo
para criar variavel dentro da funçao basta declar ela antes do begin veja um exemplo
argumentos sao os valor de entrada da funçao, passar como argumento basta criar uma variavel dentro da abre e fecha parenteses para receber o valor e depois quando vc chamar a funçao vc coloca o valor de entrada dentro do abre e fecha parenteses para o valor q vai ir para funçao, veja o exemplo
no meu exemplo acima eu criei uma variavel y dentro da funçao hack para receber o valor de entrada, depois criei mais uma variavel x q recebe o valor de entrada y + 100 e depois tem o retorno da funçao com o valor da variavel x, na funçao principal criei uma variavel chamado rec e ela recebe o valor de saida da funçao hack depois q e passado o valor de 315 para a funçao, so para nao ter duvida nesse ponto o valor de entrada e envidado antes do valor de retorno no nosso exemplo ele passo o valor 315 antes da variavel rec receber o valor de retorno da mesma, essas funçao pode ser feita tanto na linguagem pascal quanto no delphi, bom galera para criar funçao e isso ^^
by hacker fts315
- Código:
//by hacker fts315
program funcao;
var x, fts, resu: integer;
begin
x:= 15;
fts:= 300;
resu:= fts + x;
writeln(resu);
end.
na minha source acima ele cria 3 variaveis x,fts,resu a variavel x recebe 15, a variavel fts recebe 300, e a variavel resu recebe a soma da variavel x e fts, se agente tivesse q fazer o mesmo algoritimo so q mudando a variavel x veja um exemplo
- Código:
//by hacker fts315
program funcao;
var x, y, w, a, b, fts, resu: integer;
begin
fts:= 300;
x:= 15;
y:= 500;
w:= 1000;
a:= 5000;
b:= 10000;
resu:= fts + x;
writeln(resu);
resu:= fts + y;
writeln(resu);
resu:= fts + w;
writeln(resu);
resu:= fts + a;
writeln(resu);
resu:= fts + b;
writeln(resu);
end.
para facilitar agente poderia criar uma funçao, tipo veja como ficaria a nossa source usando uma funçao
- Código:
//by hacker fts315
program funcao;
function func(rec: integer): integer;
var fts,resu: integer;
begin
fts:= 315;
resu:= fts + rec;
func:= resu;
end;
var x, y, w, a, b: integer;
begin
x:= 15;
y:= 500;
w:= 1000;
a:= 5000;
b:= 10000;
writeln(func(x));
writeln(func(y));
writeln(func(w));
writeln(func(a));
writeln(func(b));
end.
a vantagem de criar funçao q vc pode pegar apenas ela e colocar em outras source, agora vamos ensinar a criar uma, para criar uma funçao vc tem q declarar ela usando o comando function depois vc escreve um nome para ela no meu exemplo ela se chama func abre depois abre e fecha parenteses dentro dele vai ser passado um argumento, depois vc tem q colocar o tipo de retorno dele no meu exemplo ele retorna um valor inteiro, veja outro exemplo
- Código:
function hack(): integer;
o argumento e o valor de entrada e o retorno o valor de saida, logo depois q va declarar ela basta usar o begin e end; para agente escreve nossa funçao veja outro exemplo
- Código:
function hack(): integer;
begin
end;
para ter o retorno agente atribui o valor de retorno ao propria funçao no nosso caso agente vai atribuir ao hack
- Código:
function hack(): integer;
begin
hack:= 315;
end;
para chamar a funçao basta usar o nome dela e abre fecha paretenses, nosso exemplo seria hack(), algumas vezes vc pode querer q o valor de retorno de uma funçao seja atribuido a uma variavel veja um exemplo
- Código:
//by hacker fts315
program funcao;
function hack(): integer;
begin
hack:= 315;
end;
var receber: integer;
begin
receber:= hack();
writeln(receber);
end.
para criar variavel dentro da funçao basta declar ela antes do begin veja um exemplo
- Código:
function hack(): integer;
var x: integer;
begin
x := 315;
hack:= x;
end;
argumentos sao os valor de entrada da funçao, passar como argumento basta criar uma variavel dentro da abre e fecha parenteses para receber o valor e depois quando vc chamar a funçao vc coloca o valor de entrada dentro do abre e fecha parenteses para o valor q vai ir para funçao, veja o exemplo
- Código:
//by hacker fts315
program funcao;
function hack(y: integer): integer;
var x: integer;
begin
x:= y + 100;
hack:= x;
end;
var rec: integer;
begin
rec:= hack(315);
writeln(receber);
end.
no meu exemplo acima eu criei uma variavel y dentro da funçao hack para receber o valor de entrada, depois criei mais uma variavel x q recebe o valor de entrada y + 100 e depois tem o retorno da funçao com o valor da variavel x, na funçao principal criei uma variavel chamado rec e ela recebe o valor de saida da funçao hack depois q e passado o valor de 315 para a funçao, so para nao ter duvida nesse ponto o valor de entrada e envidado antes do valor de retorno no nosso exemplo ele passo o valor 315 antes da variavel rec receber o valor de retorno da mesma, essas funçao pode ser feita tanto na linguagem pascal quanto no delphi, bom galera para criar funçao e isso ^^
by hacker fts315