Дан целочисленный массив из 10 целых чисел. Преобразуйте его, прибавив к нечетным числам значение последнего элемента. Последний элемент массива оставьте без изменений.(В Паскале)

Есть ответ
17.12.2022
329

Ответ


var a:array[1..10]of integer;i:integer;beginfor i:=1 to 10 do readln(a[i]);for i:=1 to 9 do

if a[i] mod 2=1 then a[i]:=a[i]+a[10];

writeln;for i:=1 to 10 do write(a[i],' ');end.


Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
17.12.2022
Этот сайт использует cookies (Политика Cookies). Вы можете указать условия хранения и доступ к cookies в своем браузере.