Número primo
Publicado por Kelyane (última atualização em 01/10/2009)
[ Hits: 5.683 ]
Homepage: http://blog.kelyane.com
Programa que verifica se o número é primo ou não.
Program NumPrimo ; Var N, i: integer; isPrimo: boolean; respostaUsuario: char; Begin repeat write('Informe um número: '); readln(N); i:=2; isPrimo:= true ; while (i<N) and (isPrimo) do begin if (N mod i = 0) then begin isPrimo:= false ; end ; i:= i+1 ; end; if (isPrimo) then Begin writeln(N, ' é um número primo'); End else Begin writeln(N, ' não é um número primo, porque é divisível por ', i-1); End; write('Deseja continuar ? (S/N)'); readln(respostaUsuario); until (respostaUsuario='N') or (respostaUsuario='n') ; End.
Calculadora de décimo terceiro salário em Pascal
calcular o percentual de pessoas que sao maiores de idade
Editor de Texto feito no Lazarus(Delphi 7 para Linux)
Servidor de Backup com Ubuntu Server 24.04 LTS, RAID e Duplicati (Dell PowerEdge T420)
Visualizar câmeras IP ONVIF no Linux sem necessidade de instalar aplicativos
Atualizar Debian Online de uma Versão para outra
Proteja seu Linux Mint com o Timeshift: Restaure o sistema mesmo que ele não inicie!
Instalando Google Chrome no Debian 13
Alguém pode me recomendar um editor de textos? [RESOLVIDO] (9)
Erro de interface de Rede no Virt Manager dentro Debian 13 KDE (0)
meus dois pen drives não são mais reconhecidos pelo meu PC apos tentar... (3)