1)Здесь можно применить формулу
<span>2^i = N
</span>2)подставим под N=8
<span>2^i = 8
</span><span> i= 3 (здесь нужно посчитать что 2^3=2*2*2=8)
</span>Ответ: 3 бита одна буква
Program Algorithm;
uses crt;
var result, a:real;
begin
for a:= 0 to 10.5 do
begin
result:=2*(Pow (a),5)*3*a*a-1/7*a+12;
a:=a+1.5;
writeline ("Your answer is ", result);
end;
end.
Как-то так, возможно не надо ставить begin/end в цикле for, потому что я уже не помню когда они нужны.
Progtam asd;
Uses crt;
Var a,n,s:integer;
begin
readln (n);
for a:=3 to n do
s:=a+s;
end.
TEMPERATURA[1]= -19
TEMPERATURA[2]= -19
TEMPERATURA[3]= -10
TEMPERATURA[4]= 0
TEMPERATURA[5]= 11
TEMPERATURA[6]= 15
TEMPERATURA[7]= 21
TEMPERATURA[8]=
22
TEMPERATURA[9]=12
TEMPERATURA[10]=6
TEMPERATURA[11]=-3
TEMPERATURA[12]=-10
ЗМ-СК-ЧК (зеленая мышка, синий коврик и тд.)
ЗМ-КК-ЧК
ЗМ-КК-БК
ФМ-СК-ЧК
ФМ-КК-ЧК
ФМ-КК-БК
Ответ: 6 наборов.
P.S. Это делать в тетради нужно в форме дерева