Дан целочисленный массив размера n, заполненный целыми числами не превышающими 104. необходимо получить два новых массива: в первом массиве должны быть собраны только четные числа, а во втором - нечетные числа. порядок следования элементов в новых массивах не нарушать. формат ввода в первой строке входного файла записано целое число n - размер массива (1 ⩽ n ⩽ 1000). во второй строке записано n целых чисел через пробел, не превышающих 104. формат вывода

209

329

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

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

reginailt

Информатика

4,5(22 оценок)

// pascalabc.net 3.2, сборка 1374 от 10.01.2017 // внимание! если программа не работает, обновите версию! procedure printarr(f: text; a: array of integer); begin foreach var x in a do write(f,x,' '); writeln(f) end; begin var fin: =openread('input.txt'); var n: =readlninteger(fin); var a: =new integer[n]; for var i: =0 to n-1 do read(fin,a[i]); var fout: =openwrite('output.txt'); fin.close; printarr(fout,a); var b: =a.where(x-> x.iseven).toarray; printarr(fout,b); var c: =a.where(x-> x.isodd).toarray; printarr(fout,c); fout.close end.