Program n_1;
var n,i,s:integer;
begin
s:=0;
readln(n);
for i:=1 to n do
begin
if (n mod i)=0 then s:=s+1
end;
writeln(s)
end.
Program Geron;var
a, b, c, p, s: real;begin
readln(a, b, c); p := (a + b +c) / 2; s:= sqrt(p*(p - a)*(p - b)*(p -c )); writeln(s);
end.
Для начала переведем 11011110 в десятичную систему счисления
11011110(2)=222(10) следовательно 220>x
значит таких натуральных значений существует 219
Ответ: 219
В условии задания не сказано, запрещено ли роботу ходить по закрашенным клеткам или нет,поэтому будем считать что разрешено.
a) начало
пока справа свободно (если закрашено (вниз,закрасить,вверх; ) вправо)
если закрашено (вниз,закрасить ;)
конец.
В данном алгоритме робот идет направо,пока не достигнет конца. При каждом смещении вправо он проверяет,на какой клетке стоит : если клетка,на которой стоит робот закрашена, то он закрашивает клетку под ней. После цикла делается ещё одна проверка,так как робот, находясь на последней клетке справа не будет заходить внутрь цикла, так как условие "пока справа свободно" не выполнится, поэтому добавим ещё одну проверку после цикла для последней клетки.
б) Здесь алгоритм аналогичный, только добавляется ещё заход в верхнюю клетку для закраски.
начало
пока справа свободно (если клетка закрашена (вверх, закрасить, вниз, вниз, закрасить, вверх; ) вправо)
если клетка закрашена (вверх,закрасить,вниз,вниз,закрасить)
конец.