Братцы, наверное многих уже достал своими проблемами, но завтра они в любом случае у меня закончатся: либо сдам долги по лабам, либо нет...Вот ещё задачка....
Исходные данные: X=0.38 N=9
klem4
22.12.2004 2:20
Вроде так :
Код
uses crt; var p,x,y:extended; i,n:integer; Begin readln(n); readln(x); p:=1; for i:=2 to n do p:=p*(2.8*(exp(3*ln(x)))+2.8*sin(i*x)); y:=3*sin(x)+p; writeln('y=',y:2:3); readln; end.
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.