Предмет: Информатика,
автор: НеВиД
Дан целочисленный массив из 10 целых чисел. Преобразуйте его, прибавив к нечетным числам значение последнего элемента. Последний элемент массива оставьте без изменений.(В Паскале)
Ответы
Автор ответа:
0
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.
Интересные вопросы
Предмет: Математика,
автор: vikishow121232
Предмет: Окружающий мир,
автор: beisenbaevajanel08
Предмет: Музыка,
автор: polyelizarova
Предмет: Математика,
автор: паргдвпопокан
Предмет: Химия,
автор: ZigizmunD