Вам как нужно возможно использование массивов
Нет, массивы использовать нельзя
хорошо пробуем

Ответы и объяснения

2014-01-24T18:59:35+00:00
VAR
   i, j: Integer;
BEGIN
   Write(' ');
   for i := 1 to 9 do Write(i,' '); Writeln;

   for i := 1 to 9 do begin
      Write(i,' ');
      for j := 1 to 9 do
         if (i*j > 9) then Write(i*j,' ')
         else Write(i*j,' ');
      Writeln;
   end;
END.
в 5 строке - 4 отступа
Комментарий удален
в 10 строке - 3 отступа
в 11 строке - 4 отступа
отступы ставятся во Write, между ' '