Дан целочисленный массив из 10 целых чисел. Преобразуйте его, прибавив к нечетным числам значение последнего элемента. Последний элемент массива оставьте без изменений.(В Паскале)
Дан целочисленный массив из 10 целых чисел. Преобразуйте его, прибавив к нечетным числам значение последнего элемента. Последний элемент массива оставьте без изменений.(В Паскале)
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
var a:array[1..10]of integer;
i:integer;
begin
for 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.