Нужно сделать в Питоне. Универмаг в ноябре продал товаров на А млн.руб, что на 15% больше чем в ноябре. На какую сумму были проданы товары в октябре?

фото прикрепила с ответом

A = int(input()) // ввели значение A

print(A * 0.85) // Так как A больше чем искомое значение на 15 %, значит искомое значение это (1-0.15)A = 0.85A это и пропишем

 

 

стр 21 № 27

1 картинка тёплый дождь и розовые облака

2 картинка тёплый дождь и жёлтые облака

3 картинка холодный дождь и синии облоко

 

стр 22 № 28

                                                          МНОЖЕСТВО:

прямоугольник - растений

круг - деревьев

квадрат - лиственные деревьев

овал - вечнозелёных деревьев

треугольник - кустарников

квадрат в круге - не лиственных деревьев

пересечение квадрата и овала - вечнозелёных и лиственых деревьев

объеденение квадрата и круга - вечно зелёных или лиственых деревьев

 

дуб в квадрат но не в овала

сирень в треугольник

лиственница  в круг

сосна в овал но не в квадрат

пальма в пересечение квадрата и овала

 ВЫСКАЗЫВАНИЕ:                                           деревья для которых высказывание истинно

 

Дерево не лиственное                                        Лиственница, сосна

Дерево лиственное и вечнозелёное                 Пальма

Дерево лиственное или вечнозелёное             Дуб , сосна, пльма

Дерево лиственное и не вечнозелёное            Дуб

Дерево не лиственное и не вечнозелёное       Лиственница

var
a,b,c,i,n,p,s:integer;
x:real;
p1,g:string;
begin
writeln('vvedite chislo');
readln(a);
writeln('is kakoi perevodim?');
readln(b);
if b=10 then begin
writeln('v kakoi perevodim?');
readln(c);
end;
n:=0;
p:=0;

 

if b<>10 then begin      'is 10 v lubuyu sistemu
repeat
x:=exp(ln(b)*n);
s:=Round(x);
p:=p + (a mod 10)*s;
a:= a div 10;
n:=n+1;
until a=0;
end

else begin

repeat                         'is luboi sistemi v 10
g:=IntToStr(a mod c);
p1:=p1 + g;
a:=a div c;
until a<c;
p1:=p1+IntToStr(a);
end;

if p=0 then begin         'vivod
for i:=1 to length(p1) do
write(p1[length(p1)-i+1]);
end
else
write(p);
end.