begin
  var a := ReadInteger('a = ');
  var b := ReadInteger('b = ');
  
  for var i := a to b do
    Writeln(Format('{0} в квадрате = {1}', i, i*i));
end.