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

[Visitante: kuim888]

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

[iceberg]

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é!!!!!!

[Visitante: kuim888]

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!!!

[iceberg]

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!!!