Поэкспериментируйте,что бы решить проблему.Допустим,вы хотите вставить сноскц,но внизу страницы отсутствует - id1122853420210719 от masadropd1 19.07.2021 15:21

Question

Информатика: Поэкспериментируйте,что бы решить проблему.Допустим,вы хотите вставить сноскц,но внизу страницы отсутствует возможность вписать пояснение,так как там расположена большая таблица.Как поменять в свойствах обрезание таблицы,чтобы вставить сноску

masadropd1 · Accepted Answer

// PascalABC.NET 3.2, сборка 1374 от 10.01.2017
// Внимание! Если программа не работает, обновите версию!

begin
Writeln('*** Матрица А ***');
var a:=MatrRandom(4,7,-50,50); a.Println(4);
Writeln('*** Матрица B ***');
var b:=MatrRandom(4,7,-50,50); b.Println(4);
Writeln(4*a.ColCount*'-');
Writeln('*** Матрица А-B ***');
for var i:=0 to 3 do begin
    for var j:=0 to 6 do Write(a[i,j]-b[i,j]:4);
    Writeln
    end;
end.

Пример
*** Матрица А ***
11 -12 -37 22   3 -8 16
-2 21 31   4 -1 13 20
18 -42 -46 -17 19   8 -14
-26 -32 -2 31 -26 -43 -31
*** Матрица B ***
13 -14 12 -37   2 -12 34
26 25 -47   2 -42   1 -43
44 -6 -1 24 37 -9 -3
-30   3 -29 -39 -11 -8 -14

*** Матрица А-B ***
-2   2 -49 59   1   4 -18
-28 -4 78   2 41 12 63
-26 -36 -45 -41 -18 17 -11
   4 -35 27 70 -15 -35 -17

MOGZ ответил