P = 0
print('a')
a = int(input())
print('b')
b = int(input())
z = b
if b < 0:
z = -b
for i in range(1, z+1):
p += a
if b < 0:
p = -p
print('p =', p)
===== PascalABC.NET =====
function Min3(a, b, c: real) := Min(Min(a, b), c);
begin
var (a, b, c) := ReadReal3;
Min3(a, b, c).Println
end.
щетая краску бесконечной
опустить кисть - оп
поднять кисть - по
покрасить жёлтым - пж
покрасить красным - пк
1.оп; 2.пж; 3.по; 4.вправо; 5.оп 6.пк 7.по 8.вправо и т.д весь рисунок
1 МБ = 1024 Кбайт
0,5 МБ = 512 Кбайт
1024 * 15 + 512 = 15872 Кбайт
Ответ: 15872 Кбайт
x - бронебойных
2x - трассирующих
2x+6 - обычных
Общее количество патронов:
x+2x+2x+6 = 5x+6
log(2)[1/2x/(5x+6)] = log(2)[(5x+6)/2x] = 2
(5x+6)/2x = 2^2
5x+6 = 8x
3x = 6
x = 2
5x+6 = 5*2+6 = 16
Ответ: 16,2