Вячейке d7 записана формула (c3 + c5)/d6. как она изменится при переносе этой формулы в ячейку: а)d8; б)e7; в)c6; г)f10

Program p; var x: integer; // видна везде procedure p1; // видна везде   var y: integer; // видна внутри p1   begin   p2; // ошибка: не видна в p1 end; procedure p2; // видна везде, кроме р1   var z: integer; // видна внутри р2   begin   {тело процедуры} end; procedure p3; // видна в основной программе   var m: integer; // видна внутри р3   begin   p1; end;   begin   {тело основной программы}   p3; end.

Pascalabc.net 3.3.5, сборка 1662 от 29.04.2018 внимание! если программа не работает, обновите версию! begin   var (sn,pp,kp): =(0,1,0);   var n: integer;   repeat       read(n);       if (n< 0) and n.isodd then sn+=n       else           if (n> 0) and (n mod 3=0) then begin pp*=n; kp+=1 end   until n=0;   if sn=0 then begin       writeln('нет отрицательных нечетных чисел');       if kp=0 then writeln('нет положительных чисел, кратных 3')       else writeln('произведение положительных чисел, кратных 3: ',pp)       end   else begin       writeln('сумма отрицательных нечетных чисел: ',sn);       if kp=0 then writeln('нет положительных чисел, кратных 3')       else writeln('произведение положительных чисел, кратных 3: ',pp)       end end. пример -367 23 62 7 12 -24 90 152 -63 0 сумма отрицательных нечетных чисел: -430 произведение положительных чисел, кратных 3: 1080