SóProvas


ID
1478971
Banca
FUNIVERSA
Órgão
CFM
Ano
2012
Provas
Disciplina
Programação
Assuntos

Considere o trecho do programa a seguir, escrito em linguagem Delphi:

function funcaoP(base, expoente: LongInt): LongInt;
begin
  if expoente = 0 then
     Result := 1
  else
    Result := base * funcaoP(base, expoente - 1);
end;
procedure TFormFuncao.BtnPrincipalClick(Sender: TObject);
begin
  ShowMessage('5 funcaoP 3 é igual a: ' + IntToStr(funcaoP(5, 3)));
end;


A execução do programa e click no botão BtnPrincipal terá como resultado:

Alternativas
Comentários
  • FunçãoP(5,3)

    Ao chamar a função passa os valores 5 como base e chama novamente a FunçãoP(5,2)

    Temos então, 5 * 5 elevado a 2 = 5 * 25 = 125

    Espero ter ajudado, caso tenha algum erro favor corrigir.