Дан целочисленный массив из 10 целых чисел. Преобразуйте его, прибавив к нечетным числам значение последнего элемента. Последний элемент массива оставьте без изменений.(В Паскале)
Дан целочисленный массив из 10 целых чисел. Преобразуйте его, прибавив к нечетным числам значение последнего элемента. Последний элемент массива оставьте без изменений.(В Паскале)
Гость
Ответ(ы) на вопрос:
Гостьvar
m : array [1..10] of Integer;
i : Integer;
begin
// Здесь заносишь значения в массив.
for i := 1 to 9 do
if ( m[i] mod 2 ) <> 0 then m[i] := m[i] + m[10]; end.
Не нашли ответ?
Похожие вопросы