Запиши развёрнутую запись числа 0,566 для дробной части числа позя

ошибка в том что натуральный логарифм (-1) не существует

program summa; uses crt; var n,i: integer; s: real;

p1,p2: integer; begin clrscr; writeln ('vvedite n'); readln (n); s: =0;

p1: =-1;

p2: =2; for i: =1 to n do

begins: =s+p1/p2;

p1: =-p1;

p2: =p2*2;

end; writeln ('s=', s); readln; end.

1)сила всех и глубина вростания репки, так же состояние здоровья каждого и состояние почвы

а так же не завалялась ли где нормальная лопата

2)смотря что такое по братски, но зная карлсона, он возьмет себе большой

3)главное чтоб пончику хватило. а больше он все равно сделать не в состоянии

4) радиус двери, радиус вини, прирост от сгущенки, прирост от меда, кол-во того и другого, скорость похудения и тп

l*pi*((r+a)^2- (r)^2)*p

p - плотность

program 1;

var i, dlina, shirina, visota,  n, s, v : integer; beginwriteln(’введите число залов‘); readln (n); for  i: =1  to  n  do  beginwriteln(’введите длину,ширину и высоту зала‘); readln (dlina, shirina, visota); s: =dlina*shirina; v: =s*visota; writeln(‘площадь  пола=’,s,’  объем  зала=‘,v); endend.

если это 8-9 класс, то должно быть