Составить программу в паскаль авс. даны вектора a, b. элементы матрицы s=(sij) m*n вычисляются по формуле sij= ai*bj. найти матрицу s и сумму элементов ее k-ого столбца. вектор a =(2; -7.1; 3.2; -5.4; 6.9), вектор b = (8.1; 3.2; -6.4; -3.5) , k=3
117
272
Ответы на вопрос:
// pascalabc.net 3.0, сборка 1073 const m=5; n=4; a: array[1..m] of real=(2,-7.1,3.2,-5.4,6.9); b: array[1..n] of real=(8.1,3.2,-6.4,-3.5); k=3; var i,j: integer; sk: real; s: array[1..m,1..n] of real; begin writeln('массив s'); for i: =1 to m do begin for j: =1 to n do begin s[i,j]: =a[i]*b[j]; write(s[i,j]: 7: 2) end; writeln end; sk: =0; for i: =1 to m do sk: =sk+s[i,k]; writeln('сумма элементов столбца ',k,' равна ',sk) end. результат выполнения программы: массив s 16.20 6.40 -12.80 -7.00 -57.51 -22.72 45.44 24.85 25.92 10.24 -20.48 -11.20 -43.74 -17.28 34.56 18.90 55.89 22.08 -44.16 -24.15 сумма элементов столбца 3 равна 2.56
При использовании палитры из 16 цветов для хранения одной точки изображения необходимо log(2)16 = 4 бита. для всего изображения: 640*256*4 = 655360 бит
Популярно: Информатика
-
Файрома26.01.2020 22:38
-
onaleman18.11.2020 13:54
-
vikasibarik22.12.2020 11:42
-
Саняша6902.02.2020 09:27
-
Lrins15.07.2020 12:42
-
KSUmaUYouTobe04.07.2022 00:01
-
Колобокхоёк25.02.2022 22:19
-
yaroslavaaf30.07.2020 10:39
-
Kesha444423.01.2021 04:35
-
rus20013004.12.2021 21:03