нп завтро надо найдите количество положительных и количество отрицательных элементов массива из 8 целвх чисел. Заранее СПАСИБО

Program n1; var a: array[1..8] of integer; ko,kp,i: integer; begin write('массив: '); ko: =0; kp: =0; for i: =1 to 8 do begin a[i]: =random(21)-10; write(a[i],' '); if a[i]> 0 then kp: =kp+1; if a[i]< 0 then ko: =ko+1; end; writeln; writeln('количество отрицательных: ',ko); write('количество положительных: ',kp); end.

А) овал это правильно

X - в A1, у - в А2.
Тогда формулы:
=(1+A1^2)/(2*КОРЕНЬ(1+A1:A14))
=2*A1+SIN(A1)^2/(2+A1+A1^2)
=2*A1^2*COS(A1)^2-2*A2^2

124^5     >     764^8 - 175^8