Var a:real;
Begin
readln (a); //сторона куба
writeln (a*a*6); // площадь поверхности
writeln (a*a*a); //объем
End.
Var a:real;
Begin
readln (a); //сторона куба
writeln (a*a*6); // площадь поверхности
writeln (a*a*a); //объем
End.