Pascal (Паскаль)

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Другие темы раздела
Pascal Составление программы на нахождение числа https://www.cyberforum.ru/ pascal/ thread664821.html помогите составить программу,позволяющую выяснить есть ли в отрезке натуральное число М квадрат суммы которого равен М-Х.	Pascal Составить программу вычисления Помогите составить программу вычисления значений кусочно-заданной функции: y={ 2 cos x-5 ln(-x), x< -5 ln(2+sin x), - 5 ≤ x ≤ 2 lg(8 ln x+2 sin x), x>2 y=\begin{cases}2 cos x-5 ln(-x), & \text{ } x< -5 \\ln(2+sin x), & \text{ } - 5\leq x\leq 2 \\lg(8 ln x+2 sin x), & \text{ } x>2
Pascal Составить программу вычисления значений функции Помогите составить программу вычисления значений функции y=\|log\|x\|\| с учетом области определения. https://www.cyberforum.ru/ pascal/ thread664816.html	Pascal Дан файл f2. Переписать в “перевернутом” виде его строки Здраствуйте, не ловко вас беспокоить, но не могли бы вы мне указать мою ошибку в данной программе....? Program zadacha3_1; Var f,g:text; s:string; Function Perevorot(t:string):string; Var i:integer; s:string; Begin For i:=1to length (t) do insert (t,s,1); Perevorot:=s; https://www.cyberforum.ru/ pascal/ thread664776.html
Найти первое число,большее данного числа N и взаимно простое с заданным числом M Pascal Всем привет!Нужна помощь в составлении программ: 3) программы нахождения первого натурального числа,большего данного натурального числа N и взаимно простого с заданным натуральным числом M.	Pascal Найти первый член последовательности, для которого выполнено условие https://www.cyberforum.ru/ pascal/ thread664767.html Дано действительное число ε (ε>0). Последовательность {a}_{1}, {a}_{2,} … образована по следующему закону: {a}_{n}=\frac{n}{{\sqrt{{n}^{2}+1}}-\sqrt{{n}^{2}-1}} Найти первый член {a}_{n} \left(n\geq 2 \right), для которого выполнено условие \left\|{a}_{n}-{a}_{n-1} \right\|<\varepsilon
Pascal Программа подсчета простых трёхзначных чисел https://www.cyberforum.ru/ pascal/ thread664765.html Всем привет!Нужна помощь в составлении программ: 2)программы подсчета простых трёхзначных чисел	Pascal программа вычисления произведения Всем привет!Нужна помощь в составлении программ: 1)программы вычисления произведения n(n+1)....*(2n)
Pascal Составьте программу подсчета "близнецов" День добрый,помогите составить программу подсчета "близнецов" лежащих в интервале (Т ,2Т -1) (Т>2) "близнецы"-пара последовательных натуральных чисел разность между которыми = 2 (пример 11;13) https://www.cyberforum.ru/ pascal/ thread664732.html	Pascal Составить программу табулирования функции Всем привет помогите пожалуйста на паскале составить программу табулирования функции y=1/x+sin(x) на отрезке с шагом 1. https://www.cyberforum.ru/ pascal/ thread664728.html
Pascal Табулирование функции Ребята, помогите срочно написать задачу в Паскале. Условия задачи такие: Для каждого 0.16≤у≤1.16 с шагом Δу=0.24 при всех 0.1≤z≤0.5 вычислить s=(y(x)^2+z)∙arcsinz, причем, если y<0.8, то Δz=0.1, иначе Δz=0.05.	Pascal Решение системы уравнений итерационным методом https://www.cyberforum.ru/ pascal/ thread664629.html система x1=0,52x2+0,08x3+0,13x4-0,22 x2=0,07x1-0,38x2-0,05x3+0,41x4+1,8 x3=0,04x1+0,42x2+0,11x3-0,07x4-1,3 x4=0,17x1+0,18x2-0,13x3+0,19x4+0,33

BumerangSP

4311 / 1422 / 463

Регистрация: 16.12.2010

Сообщений: 2,939

Записей в блоге: 3

07.10.2012, 19:54

Вычислить сумму ряда с заданной точностью - Pascal - Ответ 3531379

07.10.2012, 19:54. Показов 4958. Ответов 26

Метки (Все метки)

Ответ

А в чем смысл помощи, если задание некорректно? Я могу дать код, но для этого примера он не сработает.

Pascal

var k,s,s2,s1: real;
    n: integer;
begin
 readln(k);
 s:=k;
 s2:=k;
 n:=1;
 repeat
   s1:=s;
   s:=(exp(ln(2)*n)+exp(ln(5)*k)) /(n+k); //очередной член ряда
   s2:=s2+s;
   inc(n);
 until (abs(s1-s)<0.0001);
  writeln('Сумма = ',s2:5:4);
 readln;
end.

Вернуться к обсуждению:
Вычислить сумму ряда с заданной точностью Pascal

Следующий ответ

Заказать работу у эксперта

Programming

Эксперт

94731 / 64177 / 26122

Регистрация: 12.04.2006

Сообщений: 116,782

07.10.2012, 19:54

Готовые ответы и решения:

Вычислить сумму ряда с заданной точностью
1.1.46. l n(1-x)=-(x+x2/ 2 +x3/3 + …+ xn/n) для х<1 вот собственно говоря программа. program...

Вычислить сумму ряда с заданной точностью
Даны действительные числа x, ε (x не равно 0, ε>0). Вычислить с точностью ε ...

Вычислить сумму ряда с заданной точностью
Задали задачу по паскалю а я не могу решить((( помогите пожалуйста)))

Вычислить сумму ряда с заданной точностью
Требуется помощь, заранее спасибо. Даны действительные числа x и ε (x≠0, ε>0)....

	07.10.2012, 19:54

IT_Exp

Эксперт

87844 / 49110 / 22898

Регистрация: 17.06.2006

Сообщений: 92,604

07.10.2012, 19:54

Помогаю со студенческими работами здесь

Вычислить сумму ряда с заданной точностью
Помогите пожалуйста. Необходимо: вычислить сумму ряда при X= -0.35 с точностью ε=0.0001

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

Вычислить сумму ряда с заданной точностью
Помогите вычислить сумму ряда Добавлено через 2 минуты...

Вычислить сумму ряда с заданной точностью
Укажите правильное направление, как решать задачу: Вычислить...

Наверх