Cycles/Powers[D]

procedure CountSqrsOfNumsSet(in1,in2:integer);
var i:integer;
begin
  for i:=in1 to in2 do              //count times to square and counts to square
      Writeln(i,'*',i,'=',i*i);     //write in line i^2
end;
var a,b,i:integer;
begin
  read(a,b);                        //read nums
  CountSqrsOfNumsSet(a,b);
end.

//x^2 = x squared = x to the power of 2 = x to the 2-nd power
//x^y = x to the power of y