var a,b,c : integer;
begin
write('Ââåäèòå  ÷èñëî a=');
readln(a);
b:=a*a*a;
c:=b*b;
write('a  â  6=',c);
end.