ББотт нННннИИияяЯ ТтеЕЕллЕеГггРРааамМм - @united brai nly (Еез пПООБлОов)

284

327

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

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

ArtemPatsaliuk

Экономика

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

ОоОтТТ нНАаАннНИяяЯ тЕеЕеггГРаАм - @united brai nly (БББЕзЗЗ пррРОООБееелЛЛоо)

кошка452

Экономика

4,5(81 оценок)

БбБооТтТ ззННниИя теЕлллеегрАаА - @united brai nly (БЕзЗЗ РРоооБбЕЛлЛООввВ)

79042532294

Экономика

4,4(40 оценок)

Var i,n: integer; a: array[1..10]of integer; begin write('исходный массив'); for i: =1 to 10 do begin a[i]: =random(10); write(a[i],' '); end; writeln; n: =a[2]; writeln('преобразованный массив'); for i: =1 to 10 do begin if (i mod 2=0) then a[i]: =a[i]-n; write(a[i],' '); end; end.