Активная ячейка (ActiveCell) - это выделенная ячейка, если выделен диапазон, то обычно это первая ячейка диапазона.
Для редактирования ячейки вручную, ее для начала придется выбрать т.е. сделать активной
Это только ответ на 1 вопрос.
var a, i, n, b, sum:integer;
begin
sum:=0;
readln(n);
for i:=1 to n do
begin
readln(a);
if (a>9) and (a mod 2=0) then
sum:=sum+a;
writeln(sum);
end;
end.
Uses crt;var R:real;beginwriteln('Введите радиус круга в основании: ');readln(R);writeln('Площадь основания цилиндра= ',2*pi*sqr(R));end.