Diario de un programador. Anexo B: Códigos
Busca dígitos: Programa que verifica si un dígito está presente en un número.
C
Programa utilizado: Code Blocks 13.12
#include <stdio.h>
int main(void){
int num, resto, a, i = 0, buscar, encontrar = 0, x;
int arreglo[20];
printf("Ingresa un numero: ");
scanf("%d", &num);
while(num > 0){
i++;
resto = num % 10;
num = num / 10;
arreglo[i] = resto;
}//fin while
printf("Ingresa un digito a buscar: ");
scanf("%d", &buscar);
for(x = 0; x < i; x++){
if(arreglo[x] == buscar){
encontrar++;
}//fin if
}//fin for
if(encontrar > 0){
printf("El digito esta en el numero ingresado\n");
}
else{
printf("El digito no se encuentra\n");
}
return 0;
}//fin main
//Escrito por Gustavo J. Cerda Nilo, diciembre 2015
JAVA
Programa utilizado: Net Beans 8.0.1
Programa utilizado: Net Beans 8.0.1
import java.util.Scanner;
public class buscaDigito{
public static void main(String[]args){
Scanner ingreso = new Scanner(System.in);
int num, resto, a, i = 0, buscar, encontrar = 0, x;
int arreglo[] = new int[20];
System.out.print("Ingresa un numero: ");
num = ingreso.nextInt();
while(num > 0){
resto = num % 10;
num = num / 10;
arreglo[i] = resto;
i++;
}//fin while
System.out.print("Ingresa el numero a buscar: ");
buscar = ingreso.nextInt();
for(x = 0; x < i; x++){
if(arreglo[x] == buscar){
encontrar++;
}//fin if
}//fin for
if(encontrar > 0){
System.out.println("El digito esta en el numero ingresado");
}
else{
System.out.println("El digito no se encuentra");
}
}//fin main
}//fin class
//Escrito por Gustavo J. Cerda Nilo, diciembre 2015
PYTHON 3.5
Programa utilizado: Idle
numero = int(input("Ingresa un numero: "))
i = 0
arreglo = []
encontrar = 0
while numero > 0:
i = i + 1
resto = numero % 10
numero = int(numero / 10)
arreglo.append(resto)
buscar = int(input("Ingresa el numero a buscar: "))
for x in range(i):
if arreglo[x] == buscar:
encontrar = encontrar + 1
if encontrar > 0:
print("El digito esta en el numero ingresado")
else:
print("El digito no se encuentra")
#Escrito por Gustavo J. Cerda Nilo, diciembre 2015
SMALL BASIC
Programa utilizado: Small Basic 1.1
TextWindow.Write("Ingresa un numero: ")
numero = TextWindow.ReadNumber()
i = 0
While numero > 1
i = i + 1
resto = Math.Floor(Math.Remainder(numero, 10))
numero = numero / 10
arreglo[i] = resto
EndWhile
TextWindow.Write("Ingresa el numero a buscar: ")
buscar = TextWindow.ReadNumber()
encontrar = 0
For x = 1 To i
If arreglo[x] = buscar Then
encontrar = encontrar + 1
EndIf
EndFor
If encontrar > 0 Then
TextWindow.WriteLine("El digito esta en el numero ingresado")
Else
TextWindow.WriteLine("El digito no se encuentra")
EndIf
'Escrito por Gustavo J. Cerda Nilo, diciembre 2015
No hay comentarios:
Publicar un comentario