print "The square of $answer is ". $answer * $answer. "\n";