Cálculo de divisores de um número.
Publicado por Renan Birck Pinheiro 23/10/2005
[ Hits: 18.744 ]
Homepage: http://renanbirck.rocks
Este programinha encontra todos os divisores de um número e informa se ele é primo. Ele não é muito eficiente; com valores muito altos ele sai com um erro de ponto flutuante. Porém, pode ser usado para introduzir o C.
#include <stdio.h> #include <math.h> #include <stdlib.h> /* Este programinha encontra todos os divisores de um número e informa se ele é primo. */ /* Ele não é muito eficiente; com valores muito altos ele sai com um erro de ponto flutuante. */ int main(int argc, char *argv[]) { /* Mensagem de aviso */ if(argc != 2) { printf("Divisores x1.0. \n"); printf("Uso: "); printf("%s número ",argv[0]); return(0); } /* Declarar as variáveis */ long int Divisor,contador; short int numDivisores = 0; Divisor = atol(argv[1]); /* Converte string (argv) em longo */ for(contador=1;contador<=Divisor;contador++) { /* De 1 até o valor máximo... */ if ((Divisor % contador)==0) { /* Se a divisão não deixar resto... */ printf("%d ",contador); /* Exibir o número. */ numDivisores++; /* Aumentar a contage de divisores */ } } /* O número é primo */ numDivisores==2?printf("\n O número é primo.\n"):printf("\n O número tem %d divisores. \n ",numDivisores); /* Sair. */ return(0); }
Algorítmo para Calcular Raiz Quadrada
Retornar o montante de um capital aplicado a juros compostos
Nenhum comentário foi encontrado.
Atenção a quem posta conteúdo de dicas, scripts e tal (1)
Manutenção de sistemas Linux Debian e derivados com apt-get, apt, aptitude e dpkg
Melhorando o tempo de boot do Fedora e outras distribuições
Como instalar as extensões Dash To Dock e Hide Top Bar no Gnome 45/46
Como Atualizar Fedora 39 para 40
Instalar Google Chrome no Debian e derivados
Consertando o erro do Sushi e Wayland no Opensuse Leap 15
Instalar a última versão do PostgreSQL no Lunix mantendo atualizado
Flathub na sua distribuição Linux e comandos básicos de gerenciamento
Como adicionar módulo de saúde da bateria dos notebooks Acer ao kernel... (25)
Impressora Canon Ip 1800 (Drivers) 64 bit (1)
Erro ao converter string para inteiro (6)
[Shell Script] Script para desinstalar pacotes desnecessários no OpenSuse
[Shell Script] Script para criar certificados de forma automatizada no OpenVpn
[Shell Script] Conversor de vídeo com opção de legenda
[C/C++] BRT - Bulk Renaming Tool
[Shell Script] Criação de Usuarios , Grupo e instalação do servidor de arquivos samba