Вычислите с подпрограммы z=2x^3:3x, если x=a^2, где a=3, 5, 7, на БЭЙСИКЕ
246
299
Ответы на вопрос:
Program chik; var a: array[1..100,1..100]of integer; n,m,i,j: integer; begin readln(n,m); for i: =1 to n do for j: =1 to m do read(a[i,j]); for i: =1 to n do for j: =m downto 1 do if(a[i,j] mod 2=0)then a[i,j]: =a[i,j]+a[i,1]; for i: =1 to n do begin for j: =1 to m do write(a[i,j],' '); writeln; end; end. n,m-размеры матрицы a[i,j]-элементы матрицы пример n=3 m=3 1 2 3 4 5 6 7 8 9вывод: 1 3 3 8 5 107 15 9 a[1,2]: =a[1,2]+a[1,1]=2+1=3a[2,1]: =a[2,1]+a[2,1]=4+4=8..но чтобы первый элемент строки не изменился перед тем как нам нужно будет проверит другие элементы поэтому for j: =m downto 1 делаем т.е с конца строки проверяем чтобы первый эл.строки матрицы не измениласьнадеюсь всё понятно
Популярно: Информатика
-
Andry21120817.04.2022 13:24
-
DIMITMARASIT11.02.2023 09:43
-
olgagk125.04.2022 23:21
-
Djama123408.06.2020 12:40
-
voronvoron200218.03.2020 08:10
-
nik1324354657687912.10.2022 17:24
-
жасик007119.02.2023 02:36
-
Alina970azhieva26.07.2022 22:23
-
dmikol30.09.2021 17:53
-
Aisezim200210.10.2021 09:20