Найдите среднее арифметическое отрицательных чисел и определите количество чисел, по величине больших а и стоящих на четных местах.

281

449

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

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

GordienkoA20

Математика

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

решение

pascal

выделить код

const

n = 15; {массив из 15 элементов, можно менять}

var

a : array [1..n] of integer;

i, k, ko, _a : integer;

s : real;

begin

s : = 0;

k : = 0;

ko : = 0;

{заполняем и выводим массив, считаем сумму элементов}

writeln('массив: ');

randomize;

write('введите a: ');

readln(_a);

for i : = 1 to n do

begin

a[i] : = random(100) - 50; {создаем i-ый }

write(a[i], ' '); { }

{если отрицательный суммируем, считаем кол-во}

if a[i] < 0 then

begin

s : = s + a[i];

inc(ko)

end;

{если > a и на четном месте количество +1}

if (a[i] > _a) and (i mod 2 = 0) then inc(k)

end;

writeln; {строку перевели}

writeln('среднее арифметическое отрицательных: ', (s/ko): 0: 6);

writeln('кол-во больших a на нечетных местах: ', k)

end.

nikichosipov

Математика

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

Ядумаю, что человеку мечта нужна обязательно. если он о чём-нибудь мечтает, значит он будет стараться добиваться, чтобы его мечта сбылась. мечта бывает сбывается, а бывает и нет,но человек всё-равно любит мечтать и надеяться. у меня есть мечта побывать когда-нибудь на море и увидеть дельфина.