{$W-}
program table(input,output);
{ Prints the squares and cubes of 1..10 }
var i:integer;
begin
  writeln('Number':10,'Square':10,'Cube':10);
  for i:=1 to 10 do
    writeln(i:10,sqr(i):10,i*sqr(i):10)
end.
