program prog;
var a, b, i, j:Integer;
begin
ReadLn(a, b);
for i:= 1 to b do
for j:= 1 to a do
Write(j);
end;
WriteLn();
end.
program prog;
var a, b, i, j:Integer;
begin
ReadLn(a, b);
for i:= 1 to b do
begin
for j:= 1 to a do
begin
Write(j);
end;
WriteLn();
end;
end.