Ir para conteúdo

  • Entrar usando o Facebook Entrar usando o Twitter Entrar usando o Windows Live Login com Steam Login com Google      Entrar   
  • Cadastre-se

Ícone Classificados

Adicionar um Anúncio

Membros VIP mais recentes

Redes Sociais

Membros mais bem avaliados

Atualizações recentes de status

  • Foto
    Algus

    Aécio acaba de assumir que contará com Armínio Fraga na política econômica. Já sabemos quais "medidas impopulares" ele falava. Depois vai aparecer gente chorando as pitangas aqui por causa de salário e desemprego.

Visualizar Todas Atualizações

Aniversariantes de Hoje


Foto
- - - - -

como saber se o numero é primo ou nao e mostrar os numeros que esse numero é divid..


Este tópico foi arquivado. Isto significa que você não pode mais responder ao tópico.
3 respostas neste tópico

#1 kuim888

kuim888
  • Membros Juniores
  • 7 posts
  • Membro desde 19/06/2009
0
Neutra

Postado 19 de junho de 2009 - 22h04min

então gente estou com um exercio em pascal difícil pra caramba ...
eu sei fazer while if essas coisas
mas não sei qual condição eu faço para saber se o numero é primo
e mostrar quantos divisores ele possui ...
e também queria saber como fatora numeros pares


#2 iceberg

iceberg
  • Membros Plenos
  • 45 posts
  • Membro desde 15/03/2009
0
Neutra

Postado 20 de junho de 2009 - 07h40min

ola!
como voce não colocou o codigo, eu te direi como deve fazer parte do codigo
como dizer se um mumero é par ou não?:
voce deve utilizar o comando de decisão (if)!
deve ficar mais ou menos assim:

Program par;

var
     a:integer;
Begin
       write ('Digite um numero :');
       readln (a);
               if a mod 2=0 then
                     writeln ('O numero ',a,' é par')
               else
                     writeln ('o numero ',a,' é impar);
End.

Tente responder o resto do exercicio!
Até!!!!!!

Editado por Mog.Lucas, 20 de junho de 2009 - 13h39min.
Utilize tags [code] para separar texto de código. Obrigado! (Qualquer dúvida mande MP)


#3 kuim888

kuim888
  • Membros Juniores
  • 7 posts
  • Membro desde 19/06/2009
0
Neutra

Postado 20 de junho de 2009 - 14h38min

eu sei saber se ele par ou impar ...
mas eu queria saber
qual a condição de fatorar um numero em pascal
só isso ... valeu pela ajuda!!!


#4 iceberg

iceberg
  • Membros Plenos
  • 45 posts
  • Membro desde 15/03/2009
0
Neutra

Postado 21 de junho de 2009 - 08h06min

Desculpe man!
Li errado.
Tenta isso:
Program teste;
var
     a,m,cont:integer;
Begin
     write ('Digite um numero :');
     readln (a);
     for m:=1 to m<10 do
        begin
            if a mod m=0 then
                begin
                       cont:=cont+1;
                       writeln ('O(s) divisor(es) de ',a,'é / sao :',m);
                end;
        end;
     if cont=2 then
           writeln ('O numero ',a,' é primo');
     else
           writeln ('O numero ',a,' nao é primo');
End.                    
     
Desculpe se o codigo estiver errado.
Eu fiz fora do compilador!!!