Question

Por favor gente, meu professor de programação passou esse exercício e eu não consigo fazer de jeito nenhum, é na linguagem do PORTUGOL. Quem puder ajudar, eu agradeço.

Faça um programa que mostre o produto dos números primos entre 1 e um número inteiro qualquer digitados pelo usuário. Os números primos são aquele que só são divisíveis por 1 e ele mesmo.

Answer 1

Resposta:

Explicação:

Achei na Net em PASCAL

program numprimos;

uses crt;

var x, i, cont: integer;

begin

clrscr;

write('Informe um numero: ');

readln(x);

cont:=0;

for i:= 1 to x do

   begin

   if x mod i = 0 then cont:=cont + 1;

   end;

if cont<=2 then

  begin

  writeln('O numero ', x, ' e primo.');

  end

else

   begin

   writeln('O numero ', x, ' não e primo.');

   end;

readkey;

end.