Какая программа из приведённых используются для работы с текстовым документом? OpenOffice Writer
Paint.Net
Gimp
OpenOffice Calc

Объяснение:

OpenOffice Writer - текстовый процессор, предназначен для работы с текстовыми документами.

1. традиционное решение const   n=10; var   x,y: array[1..n] of integer;   sx,sy,i: integer; begin   randomize;   write('x: ');   sx: =0;   for i: =1 to n do begin       x[i]: =random(101)-50;       write(x[i],' ');       sx: =sx+x[i]       end;   writeln;   write('y: ');   sy: =0;   for i: =1 to n do begin       y[i]: =random(101)-50;       write(y[i],' ');       sy: =sy+y[i]       end;   writeln;   writeln('сумма х= ',sx,', сумма y= ',sy);   if sx> sy then for i: =1 to n do y[i]: =0   else for i: =1 to n do x[i]: =0;   write('x: ');   for i: =1 to n do write(x[i],' ');   writeln;   write('y: ');   for i: =1 to n do write(y[i],' ');   writeln end. пример x: 4 29 -50 -18 37 -43 -18 9 41 28 y: -8 41 -18 -6 -10 -10 47 -8 -29 25 сумма х= 19, сумма y= 24 x: 0 0 0 0 0 0 0 0 0 0 y: -8 41 -18 -6 -10 -10 47 -8 -29 25 2. аналогичное решение средствами pascalabc.net 3.2 const   n=10; begin   var x: =arrrandom(n,-50,50); write('x: '); x.println;   var y: =arrrandom(n,-50,50); write('y: '); y.println;   var sx: =x.sum; var sy: =y.sum;   writeln('сумма х= ',sx,', сумма y= ',sy);   if sx> sy then y: =arrfill(n,0) else x: =arrfill(n,0);   write('x: '); x.println;   write('y: '); y.println end. выбирать