Program BiFi;
Var x,a,s:real;
k,i:integer;
Begin
readln(x);
readln(k);
s:=0;
a:=x;
for i:=1 to k do begin a:=a/x;
s:=s+a;
writeln(s:6:3);
readln;
end.
Твой пример=0*2+1*2+0*2+1*2+0*2+1*2=0+2+0+8+0+32=42(10)
ответ точно правильный у меня 5)
Да 7-6=1 так как у второго ёжика 1 яблоко
0.375 байт = 0,375*8 бит = 3 бита.
- 8 различных шаров
1. 1305
Ответ на 1 вопрос ну либо там со знаком минус