ED(16)+20(8)=100001101(2) Здесь таких чисел нет, все меньше
Var g,i:integer;
begin
read(g);
if (g=1) or ((g>20) and (g mod 10=1)) then begin writeln('Мы нашли в лесу ',g,' гриб'); i:=1; end;
if ((g mod 10>1) and (g mod 10<5)) or ((g>21) and (g mod 10>1) and (g mod 10<5)) then begin writeln('Мы нашли в лесу ',g,' гриба'); i:=1; end;
if i=0 then writeln('Мы нашли в лесу ',g,' грибов');
<span>end.</span>
Решение на картинке.
Считаем так: оклад умножаем на коэфициент и на процент северной надбавки (процент надбавки переводим в число: X+30% = X*( 1 + 30/100) = X*1.3) Для этого в столбец Е записываем формулы (см. рисунок).
Далее, в ячейке Е11 считаем сумму всех начисленых выплат, для этого записываем фомулу =SUM(E2:E10)
<span>html редактор, xcll редактор, и т.д.</span>