begin writeln('Таблица Пифагора'); for var i:=1 to 9 do begin for var j:=1 to 9 do write(i*j:4); writeln; end; end.