Единичное - Саша, Маша, Даша и т.д.
общее - ученики класса
Var
a,b,c,d:integer;
Begin
writeln('Введите цену тетради, карандаша и линейки соответственно');
read(a,b,c);
d:=a+b+c;
if d>200 then writeln('Баланс превышен');
End.
Var f: real; x :integer;
begin //Ввод writeln ('введите x'); readln (x);
//решение
f:= x-(Power(x,3)/6)+(Power(x,5)/120)-(Power(x,7)/5040)+(Power(x,9)/362880)-(Power(x,11)/39916800)+(Power(x,13)/6227020800); {f:=Power(x,2);} //вывод writeln ('f = ', f); end.
Нам надо найти I
I=K×i
I=80×i
В русском алфавите 32 буквы
значит
32=2в степени i
i=5
I=80×5=400
Ответ:400бит
import random
m=[]
b=[]
for a in range(30):
m.append(random.randint(1,10))
for a in range(len(m)):
if (m[a])%2==0:
b.append(-m[a])
else:
b.append(m[a])
print(m)
print(b)