Как называются прикладные программы предназначенные для работы с текстом​

ответ:

блокнот,word,microsoft office,

объяснение:

Const      vt_max=10; var          i: byte;       sum: integer;       vt: array[1..vt_max]of integer;       begin   sum: =0;   writeln('начальный массив случайных чисел');   for i: =1 to vt_max do begin       vt[i]: =random(0,12);       write(vt[i]: 6);       if (vt[i]< =3) then           sum: =sum+vt[i];   end;   writeln('');     writeln('сумма элементов не больше 3 равна ', sum); end. 

// pascalabc.net 3.3, сборка 1611 от 06.01.2018 // внимание! если программа не работает, обновите версию! begin var (n,m): = readinteger2('n, m -> '); var a: = matrrandom(m,n); writeln('исходная матрица: '); a.println; dec(n); dec(m); for var i: = 0 to m do begin   swap(a[i, a.row(i).indexmin],a[i, n]);   swap(a[i, a.row(i).indexmax],a[i, 0]); end; writeln('конечная матрица: '); a.print end. пример: n, m ->   5 6 исходная матрица:   99    9  30  83  11   89  13  70  50  54   43  59  22  13  89   67  27  48  72  41   63  62    5  58  71   45  35  60    3  95 конечная матрица:   99  11  30  83    9   89  54  70  50  13   89  59  22  43  13   72  41  48  67  27   71  62  63  58    5   95  35  60  45    3