Рассмотрим случай, когда N делится на 8. Выберем следующие числа:
Нетрудно видеть, что всего здесь N чисел, причём их сумма равна 0, а произведение равно N.
Рассмотрим случай, когда N не делится на 8. Выберем следующие числа:
Всего здесь N чисел, причём их сумма равна 0, а произведение равно N.
program sum_product;
var
n: integer;
i: integer;
begin
assign(input, 'input. txt');
reset(input);
assign(output, 'output. txt');
rewrite(output);
read(n);
if (n mod 8 = 0) then
begin
write(n div 2, ' ', 2, ' ');
for i := 1 to n div 2 + 2 do
write(-1, ' ');
for i := 1 to n div 4 - 2 do
write(1, ' ', -1, ' ');
end
else
begin
write(n div 2, ' ', -2, ' ');
for i := 1 to n div 2 - 2 do
write(-1, ' ');
for i := 1 to n div 4 do
write(1, ' ', -1, ' ');
end;
close(input);
close(output);
end.
