Укажите соответствия. Компьютеры Характеристики 1 поколение Впервые использовалась концепция искусственного интеллекта. Работа над созданием не прекращается. 2 поколение Поколение создано на основе интегральных схем. Это привело к массовому использованию компьютеров в офисах, образовательных и научных заведениях. 3 поколение В их создании используются микропроцессоры или чипы. Что повысило их производительность и надежность. 4 поколение В качестве основного элемента применялись транзисторы, что привело к уменьшению их размеров. 5 поколение Размер компьютеров был большим, высота их достигала 5 метров. Их обслуживание было дорогостоящим.
begin
var m,n:integer;
Write('Ввведите число строк и столбцов: ');
Read(m,n);
var a:=MatrixRandom(m,n,-99,99);
var Vrow:=ArrFill(m,0);
var Vcol:=ArrFill(n,0.0);
for var i:=0 to m-1 do begin
var max:=-100;
for var j:=0 to n-1 do begin
Write(a[i,j]:4);
if a[i,j]>max then max:=a[i,j]
end;
Writeln;
Vrow[i]:=Max
end;
Writeln('Вектор из наибольших значений строк');
Vrow.Println;
for var j:=0 to n-1 do begin
var s:=a[0,j];
for var i:=1 to m-1 do s+=a[i,j];
Vcol[j]:=s/m
end;
Writeln('Вектор из средних арифметических по столбцам');
Vcol.Println
end.
Тестовое решение:
Ввведите число строк и столбцов: 5 8
-82 67 -78 27 69 -80 85 34
70 -82 -89 -30 -57 31 14 33
-4 -1 -93 -21 81 -66 48 31
58 18 -40 -63 -68 40 46 -44
85 46 31 -61 1 43 2 -94
Вектор из наибольших значений строк
85 70 81 58 85
Вектор из средних арифметических по столбцам
25.4 9.6 -53.8 -29.6 5.2 -6.4 39 -8