Написать программу в паскале, буду ! с клавиатуры введите одномерный массив округлить ( round) и вывести все числа, произведение всех элементов по модулю (abs)

Const n=; var a: array[1..n] of integer;       i: integer;       c: real; begin for i: =1 to n do begin   read(c);   a[i]: =round(c); end; c: =1; for i: =1 to n do begin   write(a[i],' ');   c: =c*a[i]; end; write('произведение элементов по модулю равно',abs(c)); end.

Ответ в) Москва столица России.

81920 килобайт 
или же 81 мб.

1-1)

думаю что так
2-2)