Soma de Potências

Exercício Básico

Enunciado

Faça uma Function onde fornecidos dois números inteiros positivos $N$ e $M$ pelo usuário, calcule a soma. $$S=N+N^{2}+N^{3}+...+N^{M}$$

Conceitos Sugeridos:

Dim - Declara variáveis.
For Next - Será utilizado para acumular uma soma.
Function - Function obrigatoriamente irá retornar um valor.

Lembre-se que na maioria dos casos há mais de uma forma de resolver o problema.

Dica: Crie um Loop até $M$ elevando $N$ a $i$.

Exercício Resolvido

Resolvendo o Problema

Iniciamos definindo os argumentos da função e o tipo de dados de saída
```
Function SoMaPoT(N As Long, M As Long) As Double
```
Declamos as variáveis
```
Dim i As Long
Dim Prog As Double
```
Criamos um loop For Next de 1 a $M$ no qual a progressão considera o passo do loop para o calculo da potência
```
For i = 1 To M
    Prog = Prog + (N) ^ i
Next i
```
Terminado o loop For Next definimos o resultado da Function como a variável Prog
```
SoMaPoT = Prog
```

Código Consolidado

    Function SoMaPoT(N As Long, M As Long) As Double

    Dim i As Long
    Dim Prog As Double

    For i = 1 To M
        Prog = Prog + (N) ^ i
    Next i

    SoMaPoT = Prog

    End Function

Exibir Resposta

Download do exercício Download da resposta

SuperExcelVBA.com é um site voltado ao aprendizado de VBA. Exemplos e explicações podem ter sido simplificados para maior e mais veloz compreensão. Estamos constantemente nos atualizando e corrigindo erros, porém não existe garantia sobre o conteúdo disponível no site. Todos os direitos reservados.

Excel ® é uma marca registrada da Microsoft Corporation.

INTRODUÇÃO

BÁSICO

INTERMEDIÁRIO

AVANÇADO