<span>42015 + 22015 – 15
Сначала решаешь в 10-ой системе счисления:</span>
<span>42015 + 22015 – 15 = 64015
Затем переводишь найденное число из 10-ой в 2-ую:</span>
64015(в 10-ой) = <span>1111101000001111 (в 2-ой)
В данном числе 10 единиц.
Остальные примеры решаются точно также
</span>
Var
a,b,p,s:real;
begin
Writeln('Введите значение а = ');
read(a);
writeln('Введите значение b = ');
read(b);
s:=a*b;
p:=2*(a+b);
writeln('Площадь = ',s);
Writeln('Периметр = ', p);
<span>end.</span>
Итак. В данном алгоритме цикл повторится ровно 4 раза.
z=1; x=51;
1 итерация (i=0): z=(z+x/2)/2=(1+51/2)/2=13.25
2 итерация (i=1): z=(z+x/2)/2=(13.25+51/2)/2=19.375
3 итерация (i=2): z=(z+x/2)/2=22.4375
4 итерация (i=3): z=(z+x/2)/2=23.96875
При округлении до десятых результат будет округлен в большую сторону, а 23.9+0.1=24.
Ответ: 24
CLS
INPUT "N = ", N
INPUT "A = ", A
S = 0
FOR i = 0 TO N
P = A
FOR j = 1 TO i
P = P * (A + j)
NEXT j
S = S + 1 / P
NEXT i
PRINT ; "S = "; S
END