Números primos (usando arrays)
Publicado por Santiago Staviski (última atualização em 10/12/2009)
[ Hits: 8.726 ]
Homepage: http://allenkonstanz.blogspot.com
Download lista03_questao04v2.pas
Download 1259240296.lista03_questao04v2.pas (versão 2)
Usando o Crivo de Erastótenes, fiz esse algoritmo que informa os números primos e a quantidade no intervalo de 2 a 1000.
Versão 2 - Enviado por Santiago Staviski em 26/11/2009
Changelog: Nessa versão o programa pede para o usuário informar o intervalo de números primos
Download 1259240296.lista03_questao04v2.pas
program primos; var i,x,qnt:integer; num:array[2..1000] of boolean; BEGIN qnt:=0; {inicialmente todos os numeros sao primos!} for i:=2 to 1000 do begin num[i]:= true; end; {processo de verificação dos primos} for i:=2 to 1000 do begin x:=2; while i*x <=1000 do begin num[i*x]:= false; {nao eh primo} x:=x+1 end; end; {imprimir os números} for i:=2 to 1000 do begin if num[i] = true then write(i,' '); qnt:=qnt+1; end; END.
Programa que realiza o reajuste salarial de acordo com o cargo
Nenhum comentário foi encontrado.
IA chega ao desktop e impulsiona produtividade no mundo Linux
Novos apps de produtividade, avanços em IA e distros em ebulição agitam o universo Linux
Desktop Linux ganha novos apps enquanto IA invade o noticiário
Blender 5.0 Beta, Firefox 144 e avanço da IA dominam o dia no mundo Linux
Desktop Linux ganha fôlego enquanto distros refinam experiência e segurança
Como mudar o nome de dispositivos Bluetooth via linha de comando
Adicionando o repositório backports no Debian 13 Trixie
Baixar jogos Independentes para Ubuntu [RESOLVIDO] (4)
PIP3 - erro ao instalar módulo do mariadb para o Python (1)
Linux x Plataformas de Trading - um problema (in-)solúvel? (4)