[Resolvido] Multiplicar primos

[Kandrade 7]

Quase certo, o único número par que é primo é o 2.

Faltou ele.

Sempre que n começar menor que 2 precisa multiplicar o resultado por 2.

[Gustavo Rodrigues Torre 0]

E onde eu coloco esta condição?

 

Quase certo, o único número par que é primo é o 2.

Faltou ele.

Sempre que n começar menor que 2 precisa multiplicar o resultado por 2.

[Kandrade 7]

O algoritmo abaixo resolve o problema:

 

algoritmo "semnome"
// Função :
// Autor :
// Data : 13/11/2007
// Seção de Declarações 
var
   i, n: inteiro
   acm: real
   primo: logico
inicio
acm <- 1.0
para n de 1 ate 100 faca
   primo <- verdadeiro
   para i de 2 ate (n-1) faca
	  se (n % i = 0) entao
		 primo <- falso
		 interrompa
	  fimse
   fimpara
   se (primo = verdadeiro) entao
	  acm <- acm * n
	  escreval ("achei um primo", n)
	  //escreva ("O valor da multiplicacao eh: ", acm, " ")
   fimse
fimpara
escreval(acm)
fimalgoritmo

[Gustavo Rodrigues Torre 0]

Resolvido

Obrigado mais uma vez

 

O algoritmo abaixo resolve o problema:

 

algoritmo "semnome"
// Função :
// Autor :
// Data : 13/11/2007
// Seção de Declarações 
var
   i, n: inteiro
   acm: real
   primo: logico
inicio
acm <- 1.0
para n de 1 ate 100 faca
   primo <- verdadeiro
   para i de 2 ate (n-1) faca
	  se (n % i = 0) entao
		 primo <- falso
		 interrompa
	  fimse
   fimpara
   se (primo = verdadeiro) entao
	  acm <- acm * n
	  escreval ("achei um primo", n)
	  //escreva ("O valor da multiplicacao eh: ", acm, " ")
   fimse
fimpara
escreval(acm)
fimalgoritmo

[Kandrade 7]

Foi nada.

 

Resolvido

Obrigado mais uma vez