Solução Exemplo 10

#incluir <biblioteca>
principal()
início
       inteiro i, a[100];
       para (i ← 1; i <= 100; i ←i + 1)
       início
              escreva(“Elemento “, i);
              leia(a[i]);
       fim
       para (i ← 1; i <= 100; i ←i + 1)
       início
              se (i MOD 2 = 1 & a[i] MOD 2 = 0)
                     escreva(“Elemento:“, a[i], “de posição”, i);
              se (i MOD 2 = 0 & a[i] MOD 3 = 0)
                     escreva(“Elemento:“, a[i], “de posição”, i);
       fim
fim

<<Fechar

Solução Exemplo 9

#incluir <biblioteca>
principal()
início
       inteiro i;
       inteiro a[100];
       para (i ← 1; i <= 100; i ←i + 1)
       início
              escreva(“Elemento “, i);
              leia(a[i]);
       fim
       para (i ← 1; i <= 100; i ←i + 1)
       início
              se (i MOD 2 = 0 & a[i] MOD 2 = 1)
                     escreva(“Elemento: “, a[i]);
       fim
fim


<<Fechar

Solução Exemplo 11

#incluir <biblioteca>
principal()
inicio
       inteiro vet1[10], vet2[10], i;
       para (i ← 1; i <= 10; i ←i + 1)
       inicio
              escreva("Digite um numero ");
              leia(vet[i]);
       fim
       para (i ← 1; i <= 10; i ←i + 1)
              inicio
                     aux← vet1[i]*vet1[i];
                     vet2[i] ←aux;
              fim
       para (i ← 1; i <= 10; i ←i + 1)
              escreva(vet2[i]);
fim

<<Fechar