Задание:
Помоги решить) Дан массив Ф размерности N , Получить массив В, такой что b[i]: =a[i]*2
Решение:
Var a,b: array[1… 100] of integer; n,i: integer; beginreadln (n); for i: =1 to n dobeginread (a[i]); b[i]: =a[i]*2; write (b[i],'); end; end.
Знаете другой ответ?