contar pares de 0 a 100

[Lost Dark 0]

algoritmo "contar pares de 0 a 100"
// Função :
// Autor :
// Data : 27/11/2009
// Seção de Declarações
var
i, par : inteiro
inicio
// Seção de Comandos
par = 0
para i : = 1 ate 100 faca

     escreval (par)
     par = (par+2)

     fimalgoritmo

O que estou fazendo de Errado

[quitZAUMMM 18]

Teste se é par para incrementar o contador neh.

 

[]s

[Lost Dark 0]

È que eu ainda naum sei introduzir o contador no codigo

[quitZAUMMM 18]

bom o contador você já uso.

fica + ow - assim:

para i de 0 até 100 faça
    se (//verifica se é par//) então
        contador = contador + 1;
    fim_se;
fim_para;
escreva("Total de pares: " + contador);

[]s

[_Isis_ 202]

Sò p/ constar: não é necessário iterar pelos 101 números...

 

A sequência natural é uma progressão aritmética de razão 1. Entre os pares/ímpares, a razão é 2.

 

Então, de 0 a 100, você tem 100 = 0 + (n-1)*2 == n = 51 (pares). Só precisa do início e do fim do intervalo.

[Lost Dark 0]

acho que ja entendi

vou testar e ja posto se consegui vlw v6 dois

[Lost Dark 0]

algoritmo "contar pares de 0 a 100"
// Função :
// Autor :
// Data : 27/11/2009
// Seção de Declarações
var
i, soma : inteiro
inicio
// Seção de Comandos
soma <- 2
para i = de 0 ate 100] faca
soma = (soma+i)
fimpara
escreval (soma)
fimalgoritmo

 

o que está errado agora

[quitZAUMMM 18]

da pra tentar algo assim:

para i de 2 até 100 passo 2 faça
    cont = cont +1;
fim_para

acho q da.

 

[]s