Маркер заполнения - это маленький черный квадратик в правом нижнем углу выделенной ячейки. Возле него указатель мыши принимает вид черного крестика, обычно он белый.Если протянуть маркер заполнения левой кнопкой мыши, ячейки, соседние с выделенной, куда протащили маркер, заполнятся такой же информацией (если исходная информация имеет формат даты, то заполнятся последовательностью дат) . Протягивание левой кнопкой используется для копирования формул, которые были в исходной ячейке.При протягивании маркера заполнения правой кнопкой мыши при отпускании клавиши появляется контекстное меню, в котором можно выбрать характер заполнения соседних ячеек.Команда Копировать из контекстного иеню скопирует исходную информацию, Заполнить для числовой заполнит последовательностью чисел.Заполнить только форматы - форматирование исходной ячейки скопируется на выделенныеЗаполнить только значения - скопируется не формула, если она была в исходной, а вычисленное значение.Прогрессия позволяет заполнить ячейки членами арифметической, геометрической или даты прогрессиями.
n, m, p, k, sum, x: integer;
s: string;
c, i: byte;
begin
write('Число: ');
read(n);
m := n;
k := 0;
while m <> 0 do
begin
p := m mod 10;
K := K + 1;
m := m div 10;
end;
Str(N, s);
c := 0;
for i := 1 to Length(s) do
if s[i] in ['0', '2', '4', '6', '8'] then
Inc(c);
x := n;
sum := 0;
while (x <> 0 ) do
begin
sum := sum + (x mod 10);
x := x div 10;
end;
writeln('Количество чисел: ', k);
writeln('Количество четных чисел: ', c);
writeln('Cумма чисел : ', sum);
end.