Составить программу вычисления, W=B (a-b):(c 1) A сумма положительный элементов массива B количество отрицательных элементов массива C произведение элементов массива с нечетными номерами Полученные значения элементов A,B,C,W вывести на печать.
const N=1000; var K: array [1..N] of integer; i,A,B,C: integer; W: real; begin for i:=1 to N do K[i]:=random(101)-50; A:=0; B:=0; C:=1; for i:=1 to N do begin if K[i]>0 then A:=A K[i]; if K[i]<0 then B:=B 1; if i mod 2<>0 then C:=C*K[i]; end; W:=B (A-B)/(C 1); writeln(W); end.
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.
