Cuadrado y Cubo de un numero

Algoritmo sin_titulo
 Escribir "ingresa un numero"
 Leer n;
 Para i<-1 hasta 2 Con Paso 1 Hacer
  c<-n^2;
  t<-n^3;
  Escribir "Su numero al cuadrado es: " c;
  Escribir "Su numero al cubo es: " t;
 FinPara
FinAlgoritmo