Program fantscrin;
const n = 17;
Var a: array [1..n] of integer;
i,s:integer;
Begin
for i:=1 to n do
a[i]:=random(20);
for i:=1 to n do
write(a[i],' ');
s:=0;
for i:=1 to n do
if(a[i] > 5) then s:=s+a[i];
writeln('');
write('Сумма: ',s);
End.
Здесь следует помнить:
1 байт=8 бит, 1 Кбайт=1024 байт
и операции с умножением и делением степеней с одинаковым показателем. Ответ во вложении
Ну я выжаю що ні ,тому що це моя думка
F1=lambda a,b: a/b
f2=lambda a,b: a if a<b else b
f3=lambda a,b: '=' if a==b else ('<' if a<b else '>')
procent=lambda a: a/100
#примеры
p=print
p(f1(8,2),f1(2,4))
p(f2(5,7),f2(4,3))
p(f3(5,6),f3(5,5),f3(7,3))
p(procent(40))
#результат
#4 0.5
#5 3
#< = >
#0.4
Ну 10*100=1000 бит, а т.к. 8 бит = 1 байт, то 1000/8=125 байт.