Анонимно

СРОЧНОО
Составить программу для решения задачи. Удвоить все нечетные элементы массива. Размерность массива 28

Ответ

Анонимно
Только основная часть программы:
For i:=1 to 28
do begin
if A[i] mod 2<>0
then A[i]*=2;
end;