Número primo
Publicado por Kelyane (última atualização em 01/10/2009)
[ Hits: 5.694 ]
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.
Script que verifica se um número é primo ou não
Calculadora De Decimo Terceiro Salário feita no Lazarus (Delphi 7 para Linux)
Calculadora Empresarial feita no Lazarus (Delphi 7 para Linux)
Comparação entre os escalonadores BFQ e MQ-Deadline (acesso a disco) no Arch e Debian
Conciliando o uso da ZRAM e SWAP em disco na sua máquina
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
Overclocking Permanente para Drastic no Miyoo Mini Plus
Problemas de chaves (/usr/share/keyrings) no Debian
Converter os repositórios Debian para o novo formato com as chaves
Primeiras impressões do Debian 13 (4)
Rede wifi com mesmo ip da rede eth (13)
preciso saber aonde encontro pelomenos 5 mu online que tenha download ... (1)