program masuvu_1_17;

{$APPTYPE CONSOLE}

uses
  SysUtils;

var
  a:array[1..100] of integer ;
  i:integer;
begin
  for i:=1 to 100 do
  begin
  a[i]:=sqr(i);
  write(a[i],' ');
  end;
  readln;
  end.