Gracias por leer el post.
Estoy resolviendo el siguiente ejercicio, pero me da problemas al digitar un número mayor de 4 ceros.
Problema: Realizar un algoritmo que lea un número por teclado. En caso de que ese número sea 0 o menor que 0, se saldrá del programa imprimiendo antes un mensaje de error. Si es mayor que 0, se deberá calcular su cuadrado y la raiz cuadrada del mismo, visualizando el numero que ha tecleado el usuario y su resultado (“Del numero X, su potencia es X y su raiz X” )
Definir a, b, c, r Como Entero;
Repetir
Escribir "Digite su número: ";
leer a;
Mientras a <= 0 hacer
Escribir "Error";
Escribir "Digite un número positivo;";
leer a;
FinMientras
Si a > 0 Entonces
b = a * a;
c = rc(b);
Escribir "Del número ", a;
Escribir "su potencia es ", b " y su raiz cuadrado es ", c;
FinSi
Escribir "Desea hacer otra operación:";
Escribir "Indique 1 para si y 2 para no:";
leer r;
Hasta Que r != 1;
Escribir "Gracias";
FinAlgoritmo