<span>long double fact(int i)
{
if(i < 0)
return 0;
if (i == 0)
return 1;
else return i * fact(i - 1);
<span>}
int main ()
{
</span></span><span>int x;double s,s1;cin >> x;for(int i = 0; i < x; i++){ s += pow(x,3) - (pow(x,3)*fact(3*i)) + (pow(x,5)*fact(5*i));}cout << endl << setprecision(2) << "Summa= " << s << endl;for(int i = 0; i < x; i++){ s1 += sin(x);}cout << endl << s << " = " << s1 << endl;return 0;
}</span>
1.123(5)=1*5²+2*5+1=36
2.1023(4)=1*5³+2*5+1=136
3.0,4412(5)=4*(1/5)+4*(1/25)+1*(1/125)+5*(1/625)=122/125
4.0,076(8)=7*(1/25)+6*(1/125)=41/125
5.123(10)=443(5)
6.149(10)=225(8)
7.1500(10)=2734(8)
8.25(10)=11001(2)
вроде так
program griby;
var k: integer;
begin
readln (k);
writeln ('Мы нашли в лесу',k,' ', ' грибов');
end.