Как известно, первые компьютеры специально создавались для выполнения всевозможных вычислений. начало же широкого использования компьютеров в повседневной жизни не было связано с расчётами, которые представители многих профессий до конца прошлого века выполняли вручную. как вы можете объяснить это противоречие?

Скаждым разом жизнь людей облегчалась, мы можем написать, печатать на принтере.

// pascalabc.net 3.2, сборка 1485 от 15.06.2017 // внимание! если программа не работает, обновите версию! begin   write('введите количество строк и столбцов массива: ');   var (m,n): =readinteger2;   writeln('*** исходный массив ***');   var a: =matrrandom(m,n,-5,5);   a.println(3); writeln(3*a.colcount*'-');   var k: =readinteger('введите число а для замены нулей: ');   a.transform(x-> x=0? k: x);     // вот это и вся   writeln('*** результат ***');   a.println(3) end. пример введите количество строк и столбцов массива: 7 10 *** исходный массив ***   2 -4 -1  3 -4 -4  2  1 -5 -1   -5  2 -3 -1 -1 -5  2 -4 -5 -5   -4  1  0 -1  5 -1  1  4  3 -4   2  3  3  1 -3  3 -4  0 -3  3   -3 -1  4 -3 -1 -5 -1  1  2  2   -2  4 -2  3  3 -5  1  5  4  3   1  3  4  5  3 -2  5  2 -4  1 введите число а для замены нулей: 77 *** результат ***   2 -4 -1  3 -4 -4  2  1 -5 -1   -5  2 -3 -1 -1 -5  2 -4 -5 -5   -4  1 77 -1  5 -1  1  4  3 -4   2  3  3  1 -3  3 -4 77 -3  3   -3 -1  4 -3 -1 -5 -1  1  2  2   -2  4 -2  3  3 -5  1  5  4  3   1  3  4  5  3 -2  5  2 -4  1

// pascalabc.net 3.2, сборка 1485 от 15.06.2017 // внимание! если программа не работает, обновите версию! procedure maxr(a: array[,] of integer; var b: array of integer); begin   b: =a.rows.select(r-> r.select(x-> x).max).toarray end; begin   writeln('*** исходный массив ***');   var a: =matrrandom(4,3,-99,99);   a.println(4); writeln(4*a.colcount*'-');   var b: array of integer;   maxr(a,b);   write('максимумы построчно: '); b.println end. пример *** исходный массив ***   18 -32 -82   31  44 -16   -32 -28    2   -14  -6 -82 максимумы построчно: 18 44 2 -6