Ответы и объяснения

2013-10-16T11:22:07+04:00
Var x: integer;
begin
    readln(x);
    writeln(x*x*x*x*x*x*x*x*x*x*x*x*x*x*x);
end.