Primo
Publicado por Leonardo 28/05/2007
[ Hits: 3.446 ]
Este script verifica se um determinado número digitado é primo.
Usa o comando "repeat".
var p, n:integer; r:real; begin writeln('Digite o numero '); readln(p); n:=2; if p = 2 then writeln('O numero digitado eh PRIMO') else if p = 3 then writeln('O numero digitado eh PRIMO') else begin repeat r:= p mod n; n:= n + 1; until (n<p) or (r=0); if r = 0 then writeln('O numero digitado nao eh PRIMO') else writeln('O numero digitado eh PRIMO'); end; end.
vendas de uma empresa em matriz
média dos numeros informados em posiçoes pares em um vetor
Nenhum comentário foi encontrado.
Crie alias para as tarefas que possuam longas linhas de comando - bash e zsh
Criando um gateway de internet com o Debian
Configuração básica do Conky para mostrar informações sobre a sua máquina no Desktop
Aprenda a criar músicas com Inteligência Artificial usando Suno AI
Entendendo o que é URI, URL, URN e conhecendo as diferenças entre POST e GET
Instalando Navegador Firefox no Debian 12
Bloqueando propagandas no Youtube e outros sites com o uBlocker Origin
Criando um Pen Drive Bootável no Linux
Sistema da Coréia do Norte - Red Star OS (41)
Ajuda com instalação do archlinux no VMbox (1)
Não existe o slackbuild do bash no repositório slackbuild? (4)