Нужна по массивам. паскаль 1) дан массив из 100 элементов (заполняется случайно). найти сумму тех элементов массива, порядковые номера которых не со значением этого элемента. 2) дан массив из 100 целых чисел (числа вводятся случайно). найти максимальный элемент массива.

288

338

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

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

nastia295

Информатика

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

{дан массив из 100 элементов (заполняется случайно). найти сумму тех элементов массива, порядковые номера которых не со значением этого элемента.}var j,k,i: integer; sum: longint; r: array[1..100] of integer; beginfor i: =1 to 100 do beginr[i]: = random(95)-25; write(r[i]: 3); if i < > r[i] then sum: = sum + r[i]; end; writeln; writeln('сумму элементов массива = ',sum); end. {дан массив из 100 целых чисел (числа вводятся случайно). найти максимальный элемент массива.}var k,i,max: integer; r: array[1..100] of integer; beginmax: =-25; for i: =1 to 100 do beginr[i]: = random(95)-25; write(r[i]: 3); if r[i] > max then max: = r[i]; end; writeln; writeln('максимальный элемент массива = ',max); end.

veronika13571

Информатика

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

A*b*c+a*! b*c+a*b*! c+a*b*c = (! a*b*c+a*b*c)+(a*! b*c+a*b*! c) = +a)*b*c)+a*! b*c+a*b*! c = (1*b*c)+a*! b*c+a*b*! c = b*c+a*! b*c+b*c+a*b*! c = c*(b+a*! b)+b*(c+a*! c) = c*((b+a)*(b+! b))+b*((c+a)*(c+! c)) = c*((b+a)*1)+b*((c+a)*1) = c*(b+a)+b*(c+a) = c*b+c*a+b*c+b*a = a*b+a*c+b*c