Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
var
x,y: real;
i,n: integer;
begin
n: =1;
x: =1;
y: =1;
for i: =1 to 5 do
n: =n*i;
x: =-1.5*x;
y: =y*(x+1/n);
end;
writeln(y: 15: 5);
end.
1)6шаров
2)4шаров
3)7шаров
4)5шаров
Популярные вопросы