Вмассиве x(n,m) изменить значения всех положительных - вопрос №59748827 от il1234561 26.11.2020 03:16

Question

Информатика: Вмассиве x(n,m) изменить значения всех положительных элементов,умножив их значения на 5 ,а отрицательные элементы уменьшить вдвое

il1234561 · Answer

program znan;varx:array [1..1000, 1..1000] of real;m,n,i,j:LongInt;begin ReadLn(n,m); for i:=1 to n do for j:=1 to m do begin Read(x[i,j]); if x[I,j] =0 then x[I,j]:=x[I,j]*5 else x[I,j]:=x[I,j]/2; end;end....