Ответ: acdeb
Решение:
Исходная строка порождает три комбинации:
100 011 01 10 110
100 01 10 110 110
и
10 00110110110.
Третья исключена, потому что ни один символ не начинается с двух нулей.
Во второй два последних символа одинаковы.
Следовательно, первая комбинация верна.
1.
num = input()
num_rev = int(num[::-1])
print(max( int(num), num_rev ))
2.
num1 = int(input())
num2 = int(input())
num3 = int(input())
more_then_0 = 0
less_then_0 = 0
is_0 = 0
for i in [num1, num2, num3]:
if i > 0:
more_then_0 += 1
elif i < 0:
less_then_0 += 1
else:
is_0 += 1
if more_then_0 == 3:
print(num1 + num2 + num3)
elif less_then_0 == 2:
print(num1 * num2 * num3)
elif is_0 == 2:
print(0)
3. Не понял задание, напиши в комментариях, что именно нужно сделать, а я отредактирую ответ, и напишу решение
4.
kat1 = int(input())
kat2 = int(input())
gip = (kat1**2 + kat2**2)**0.5
S = kat1*kat2/2
P = kat1+kat2+gip
//Pascal ABC.NET 3.1 сборка 1256
uses
GraphABC;
Var
n:integer;
procedure square(var n:integer);
begin
readln(n);
rectangle(window.Center.X-n div 2,window.Center.Y-n div 2,window.Center.X+n div 2,window.Center.Y+n div 2);
end;
procedure points(n:integer);
Var
x,y,i:integer;
begin
i:=0;
while i<1000 do
begin
x:=random(window.Center.X-n div 2+1,window.Center.X+n div 2-1);
y:=random(window.Center.Y-n div 2+1,window.Center.Y+n div 2-1);
setpixel(x,y,rgb(random(255),random(255),random(255)));
inc(i);
end;
end;
begin
randomize;
square(n);
points(n);
end.
3
12 - в десятичной системе счисления, 110 - в троичной
Чтобы сохранить нужную информацию, показать кому-нибудь или на память