Задачи на массивы. Нужна сама задача и к ней решение. Желательно ...
Задачи на массивы. Нужна сама задача и к ней решение. Желательно несколько задачь.
Есть ответ
17.12.2022
82
Ответ
{2 в 1)
Задача: вывести сумму всех нечетных эелементов и сумму элеметнов стоящих на четных позициях}var a:array[1..100] of integer; i, summ1, summ2, n:integer;begin summ1 := 0; summ2 := 0; randomize; write('n = '); readln(n); writeln('Исходный массив :'); for i := 1 to n do begin a[i] := random(51) - 25; write(a[i], ' '); if abs(a[i]) mod 2 = 1 then summ1 := summ1 + a[i]; if i mod 2 = 0 then summ2 := summ2 + a[i]; end; writeln; writeln('Сумма нечетных элементов: ', summ1); writeln('Сумма элементов стоящих на четных позициях: ', summ2); readln;end.
Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
Просто нажмите на кнопку "Подарить".
17.12.2022