|
0 / 0 / 0
Регистрация: 04.09.2008
Сообщений: 7
|
|
| 1 | |
Помогите с задачей07.09.2008, 17:38. Показов 876. Ответов 3
Метки нет (Все метки)
__________________
Помощь в написании контрольных, курсовых и дипломных работ здесь
0
|
|
(
|
|
| 07.09.2008, 17:38 | |
|
Ответы с готовыми решениями:
3
помогите с задачей по паскалю.... Помогите с задачей в Pascal Помогите с задачей, люди... Помогите с задачей на рекурсию |
|
Почетный модератор
64089 / 47498 / 32734
Регистрация: 18.05.2008
Сообщений: 115,182
|
|
| 07.09.2008, 17:44 | 2 |
|
Какая-то загадочная тема, появилась, пропала, снова появилась.
Код
[SIZE=2]
uses crt;
function Step(a:extended;b:integer):extended;{функция определения степени}
var i:integer;
k:extended;
begin
k:=1.0;
for i:=1 to b do
k:=k*a;
Step:=k;
end;
var x,sum:extended;
n,i:integer;
begin
clrscr;
write('x=');readln(x);
write('n=');readln(n);
sum:=0;
for i:=1 to n do
sum:=sum+(Step(x,i)+sin(i*x))/Step(3,i);{считаем сумму по формуле}
writeln('S=',sum:0:5);
readln
end.
[/SIZE]
0
|
|
|
Почетный модератор
64089 / 47498 / 32734
Регистрация: 18.05.2008
Сообщений: 115,182
|
|
| 07.09.2008, 18:27 | 4 |
|
Если нужно возвести вещественное число а в целую степень b, то число а умножается само на себя b раз. Начальное значение k=1,0.
1
|
|
| 07.09.2008, 18:27 | |
|
!!Помогите плиз с задачей!! помогите с школьной задачей Помогите с задачей в Паскале! помогите с задачей на матрици Искать еще темы с ответами Или воспользуйтесь поиском по форуму: |
