CLS INPUT "Diga un numero...", C LET D = (C * C) PRINT "El cuadrado de ese numero es...", D END