Begin clrscr; writeln('Введите значение нижнего предела X'); readln(n); writeln('Введите значение верхнего предела X'); readln(e); for i:=n to e do begin y := (i*i*i+sin(sqr(i)))/(1+sqrt(abs(i)))*cos(i); i
|
|
|
|
Все права защищены. Бесплатные рефераты и сочинения. Коллекция бесплатных рефератов! Коллекция рефератов! |