<h3>PascalABC.NET 3.4.2, сборка 1843 от 24.10.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var (v, s, t) := (55, 200, 20);
Println(v * 1000 / 3600 * t > s ? 'Да' : 'Нет')
end.
<h2>Да</h2>
Не могу знать сколькими числами нужно заполнять массив,поэтому взял 10.
1)import randomA=[]s=10chet=0nechet=0while s!=0: i=random.randint(20,100) A.append(i) s-=1
for j in A: if j%2==0: chet=chet+1 else: nechet=nechet+1
print(chet,nechet)
# -*- coding: utf-8 -*-
import math as m
print 'введите радиус: '
r = input()
c = 2 * m.pi * r
s = m.pi * (r ** 2)
v = 4 / 3 * m.pi * (r ** 3)
print('''длина окружности: {cv}
площадь круга: {sv}
объём сферы: {vv}
'''.format(cv=c, sv=s, vv=v)
)
4*1254 - 254 + 9 = 4771
4771 <span>в системе счисления с основанием 5 = 123041
следовательно 1
</span>
В десятичной это: 172 - 4 = 168
В двоичной 168 это 10101000