Элементы одномерного массива w(t) получаются расчетом по формуле w(t)= 2sin(t)+3cos(t), где t- позиция - id849623920201026 от Stasichek1 26.10.2020 13:06

Question

Информатика: Элементы одномерного массива w(t) получаются расчетом по формуле w(t)= 2sin(t)+3cos(t), где t- позиция элемента в массиве w(t). сформируйте новый массив r(f), состоящий из элементов массиваw(t), которые больше среднего арифметического элементов исходного массива. в новом массиве определите позицию максимального элемента.

Stasichek1 · Accepted Answer

//Pascal
var
A: array[1..10] of integer;
i, Count: byte;
sum: integer;
begin
randomize;
writeln('Сгенерированный массив');
for i := 1 to 10 do
begin
    A[i] := random(8)-3;
    if A[i] < 0 then
      sum := sum + A[i];
    write(A[i],' ');
end;
writeln;
writeln('Сумма отрицательных элементов = ', sum);
writeln;
writeln('Измененный массив');
for i := 1 to 10 do
begin
    if A[i] >= 0 then
    begin
      A[i] := 0;
      Count := Count + 1;
     end;
    write(A[i], ' ');
end;
writeln;
writeln('Количество нулевых элементов = ', Count);
end.

Массив из 10 элементов заполнить случайными числами от - 3 до 4 включительно. найти сумму отрицатель

Массив из 10 элементов заполнить случайными числами от - 3 до 4 включительно. найти сумму отрицатель

MOGZ ответил