Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.67/3: Рейтинг темы: голосов - 3, средняя оценка - 4.67
prime17
18 / 14 / 5
Регистрация: 12.02.2010
Сообщений: 160
1

Вычислить сумму

07.04.2010, 18:33. Просмотров 521. Ответов 5
Метки нет (Все метки)

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
program suma;
uses
    crt;
var
   i,n,k:integer;
   c,s:real;
begin
clrscr;
textcolor(green);
s:=0;
writeln('программа вычесляет сумму ');
writeln('введите переменную n ');
readln(n);
for i:=1 to n do
begin
k:=i+1;
if k mod 2=0 then c:=1
else c:=-1;
s:=(exp(k*ln(-1)))/(exp(k*ln(3*k+1)));
end;
textcolor(red);
writeln('бг¬*', s:0:2);
readln;
end.
написал вроде запускается все норма ошибок нету
Ввожу переменную "n" выкидывает вот что
"Ошибочная операция с плавающей запятой"
1
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
07.04.2010, 18:33
Ответы с готовыми решениями:

Вычислить сдельную зарплату работника, а также сумму налога и сумму на руки.
Вычислить сдельную зарплату работника, а также сумму налога и сумму на руки....

Вычислить сумму и найти число слагаемых, которые вошли в сумму
Вычислить сумму и найти число слагаемых, которые вошли в сумму. Процесс...

Вычислить сумму и найти число слагаемых, которые вошли в сумму
\sum_{n=0}^{\infty}\frac{(-1)^{n+1}x^{2n+1}}{(2n+1)(2n+3)} Вычислить сумму...

Вычислить сумму, найти сумму ряда.
http://ipic.su/img/img3/fs/P1648_18-11-11111.1321685302.jpg *1/i в квадрате*...

Вычислить две суммы: сумму первой и четвертой цифры и сумму второй и третьей цифры
Дано четырехзначное число А. Составить программу, которая бы вычисляла две...

5
yanyk1n
4333 / 1465 / 680
Регистрация: 12.03.2009
Сообщений: 5,310
07.04.2010, 18:36 2
Pascal
1
ln(-1)
Решите, пожалуйста
1
Puporev
Модератор
55433 / 42554 / 29407
Регистрация: 18.05.2008
Сообщений: 100,671
07.04.2010, 18:36 3
Цитата Сообщение от prime17 Посмотреть сообщение
ln(-1)
Арифметику где учили? Разве бывает логарифм не положительного числа?
2
prime17
18 / 14 / 5
Регистрация: 12.02.2010
Сообщений: 160
07.04.2010, 18:44  [ТС] 4
вот такое условия
Название: 411454.jpg
Просмотров: 1

Размер: 2.8 Кб
ну степень так же в pascal
Pascal
1
exp(y*ln(x))
где y - степень
x - число которое переноситься к степеню

Добавлено через 45 секунд
Цитата Сообщение от Puporev Посмотреть сообщение
Арифметику где учили? Разве бывает логарифм не положительного числа?
тфю забыл, извиняюсь
ну так как мне правильно сделать?
1
yanyk1n
4333 / 1465 / 680
Регистрация: 12.03.2009
Сообщений: 5,310
07.04.2010, 18:45 5
prime17, если хотите в отрицательную степень возвести, то лучше писать так:
1/exp(y*ln(-x)), где x<0.
2
Puporev
Модератор
55433 / 42554 / 29407
Регистрация: 18.05.2008
Сообщений: 100,671
07.04.2010, 18:45 6
Pascal
1
2
if odd(k) then s:=-...
else s:=s+.....
1
07.04.2010, 18:45
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
07.04.2010, 18:45

Вычислить сумму ряда Вычислить f(a) + 2f(a + h) + … + 2f(a + (n-1)h) + f(a + nh)
Даны действительные числа a, h, натуральное число n. Вычислить f(a) + 2f(a + h)...

Вычислить сумму элементов главной диагонали на сумму элементов в 3-й строки матрицы
Создайте матрицу (5х5). Вычислить сумму элементов главной диагонали на сумму...

Дана последовательность из n-чисел.Найти сумму всех чисел,начиная с 5-го числа и вычислить сумму первых 4-х чисел.
Дана последовательность из n-чисел.Найти сумму всех чисел,начиная с 5-го числа...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
6
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru