Вэлектронной таблице выделены ячейки a2: b5.сколько ячеек выделено?

166

232

Посмотреть ответы 2

Ответы на вопрос:

Kuanova2005

Информатика

4,7(65 оценок)

8. 2, 3, 4, 5 - четыре столбца. и два ряда: а и в. 4*2=8.

DashaTaylor11

Информатика

4,8(22 оценок)

//pascal abc.net v3.1 сборка 1172 //одномерные const n=10; type ty=array[1..n] of integer; var ara,arb: ty; i,j,max,maxia,maxib: integer; procedure maxs(ar: ty; var max,maxi: integer); var i: integer; begin for i: =1 to n do if max< ara[i] then begin maxi: =i; max: =ar[i]; end; end; begin randomize; max: =-1; writeln('array a: '); for i: =1 to n do begin ara[i]: =random(100); write(ara[i]: 4); end; maxs(ara,max,maxia); writeln; max: =-1; writeln('array b: '); for i: =1 to n do begin arb[i]: =random(100); write(arb[i]: 4); end; maxs(arb,max,maxib); j: =ara[maxia]; ara[maxia]: =arb[maxib]; arb[maxib]: =j; writeln; writeln('final array a: '); for i: =1 to n do write(ara[i]: 4); writeln; writeln('final array b: '); for i: =1 to n do write(arb[i]: 4); end. //двумерные const n=10; type ty=array[1..n,1..n] of integer; var ara,arb: ty; i,j,max,maxia,maxib,maxja,maxjb: integer; procedure maxs(ar: ty; var max,maxi,maxj: integer); var i,j: integer; begin for i: =1 to n do for j: =1 to n do if max< ara[i,j] then begin maxi: =i; maxj: =j; max: =ar[i,j]; end; end; begin randomize; max: =-1; writeln('matrix a: '); for i: =1 to n do begin writeln; for j: =1 to n do begin; ara[i,j]: =random(100); write(ara[i,j]: 4); end; end; maxs(ara,max,maxia,maxja); writeln; max: =-1; writeln('matrix b: '); for i: =1 to n do begin writeln; for j: =1 to n do begin; arb[i,j]: =random(100); write(arb[i,j]: 4); end; end; maxs(arb,max,maxib,maxjb); j: =ara[maxia,maxja]; ara[maxia,maxja]: =arb[maxib,maxjb]; arb[maxib,maxjb]: =j; writeln; writeln('final matrix a: '); for i: =1 to n do begin writeln; for j: =1 to n do write(ara[i,j]: 4); end; writeln; writeln('final matrix b: '); for i: =1 to n do begin writeln; for j: =1 to n do write(arb[i,j]: 4); end; end. пример работы(одномерный): array a: 11 83 41 30 0 23 14 41 93 66array b: 53 40 58 40 56 17 98 33 90 6final array a: 11 83 41 30 0 23 14 41 90 66final array b: 53 40 58 40 56 17 98 33 93 6