Дан массив из n различных целых чисел zero -это произвольная четыре числа из этого массива, сумма которых равна нулю. найдите сколько различных zero существует на этой массиве.

265

293

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

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

artem213131

Информатика

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

Program perebor; const n=100; var a: array[1..n] of integer; i,j,k,l: integer; begin writeln('ввести массив из ',n,' целых чисел'); for i: =1 to n do read(a[i]); for i: =1 to n do for j: =i+1 to n do for k: =j+1 to n do for l: =k+1 to n do if a[i]+a[j]+a[k]+a{l}=0 then writeln(a[i],' ',a[j],' ',a[k],',a[l] ); end.