1)ввести массив a из 25 элементов. cформировать массив b из элементов массива а,кратных трем. 2)даны массив a и b из n элементов. cформировать массив c из элементов массивов а и b, чередуя элементы.

291

293

Посмотреть ответы 2

Ответы на вопрос:

pandaswomenp08cc4

Информатика

4,8(96 оценок)

1) var a, b: array[1..25] of integer; i, x: integer; begin writeln('введите элементы массива a: '); for i : = 1 to 25 do begin read(a[i]); if a[i] mod 3 = 0 then begin x : = x + 1; b[x] : = a[i]; end; end; write('элементы массива a, кратные трём: '); for i : = 1 to x do begin write(b[i], ' '); end; end. 2) var a, b, c: array[1..10000] of integer; i, n, x: integer; begin writeln('введите размеры обоих массивов: '); read(n); write('введите элементы массива a: '); for i : = 1 to n do begin x : = x + 1; read(a[i]); end; write('введите элементы массива b: '); for i : = 1 to n do begin read(b[i]); end; write('элементы массива c: '); for i : = 1 to x do begin c[i] : = a[i]; write(c[i], ' '); c[i] : = b[i]; write(c[i], ' '); end; end.