Número perfeito e capicúa ?
Publicado por Thiago 30/09/2005
[ Hits: 13.043 ]
Nesse fonte verifico se uma quantidade pré-definida de números possui a propriedade de ser quadrado perfeito e capicúa ao mesmo tempo, ou se ele possui uma das propriedades.
Na verificação uso funções.
Este é um fonte editado por mim que teve sua origem a partir de um algoritmo acadêmico.
Qualquer sugestão me enviem um e-mail.
/* Autor: thiagoamm Data: 29/09/2005 */ // Headers (cabeçalhos) #include<stdio.h> #include<math.h> // Início mp int main() { // Função do número quadrado perfeito. int qp(int n) { int y; y = sqrt(n); if(pow(y,2) == n) return(1); // V else return(0); // F } // Função do número capicúa. int capicua(int n) { int aux,soma; aux = n; soma = 0; while(aux != 0) { soma = soma * 10 + (aux % 10); aux = aux / 10; } if(soma == n) return(1); // V else return(0); // F } int num,option; printf("\n #########################################################################"); printf("\n Opcoes: \n"); printf("\n 1 --> Verificar se um numero e quadrado perfeito e capicua ao mesmo tempo. \n"); printf("\n 2 --> Verificar se e quadrado perfeito. \n"); printf("\n 3 --> Verificar se e capicua. \n"); printf("\n ----> Informe a opcao: "); scanf("%d",&option); printf("\n #########################################################################"); for(num = 1; num <= 300; num++) { switch(option) { case 1: if(qp(num) && capicua(num)) printf("\n %d e qp e capicua \n",num); break; case 2: if(qp(num)) printf("\n %d e qp \n",num); break; case 3: if(capicua(num)) printf("\n %d e capicua \n",num); break; } } printf("\n #########################################################################"); printf("\n"); }// Fim mp
Função switch q armazena sequencias
Nenhum comentário foi encontrado.
Agora temos uma assistente virtual no fórum!!! (247)
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
Reset do linux sem perder dual boot (2)
Lançado Ubuntu 24.04 Final (6)
redirecionando saida de comando touch para o AWK[AJUDA] (1)