Program Pythagore;
Const n = 9;
Var
i, j : Byte;
Begin
For i:=1 To n Do
Begin
For j:=1 To n Do 
Write (i * j : 4);
Writeln;
End;
End.