Var
x:real;
Begin
x:=-5;
repeat
writeln('y = ',sqr(x));
x:=x+0.5;
until(x>5)
End.
Если я правильно поняла задачу и нужно из двоичного числа перевести в десятичное, то ответ 231
Var
x,s:real;
n,i:integer;
begin
write('Введите n и x: ');
readln(n,x);
for i:=1 to n do s:=s+cos(power(x,i));
writeln('y=',s)
<span>end.</span>
Нужно уберегать, в первую очередь, от электростатических зарядов при установке.
Нужно, чтобы при всхожести в 95\% выросло ровно 35 тонн. Значит, 35 разделить на 95 и умножить на 100. Ответ по версии калькулятора - 36,84210526315789. Думаю, можно округлить до 36,85 тонн.