Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Pascal Вывести заданный массив на экран Составить программу которая создаёт и выводит на экран массив такого вида: 0000000 1000001 1100011 1110111 1100011 1000001 0000000 https://www.cyberforum.ru/ pascal/ thread1858400.html Pascal Найти в классе самого высокого и самого легкого учеников
составить программу которая определяет в классе самого высокого и самого легкого учеников и выводит на экран их фамилии вес и рост
Pascal Найти ошибку в программе вычисления суммы ряда Я написала программу, но не получается. в чем моя ошибка?uses crt; var t,s:real; f:integer; x,k,i:integer; begin write('x='); readln(x); S:=x; t:=1; for k:=2 to 6 do begin if odd(k) then t:=1 else t:=-1; for i:=1 to 2*k-1 do begin https://www.cyberforum.ru/ pascal/ thread1858332.html Pascal Полное/частичное решение. Поиск последовательности в данной Есть максимальное значение F, а минимальное 0. Каждый день может произойти событие, если оно происходит X дней подряд, то к текущему значению добавляется 1, для 2*Х соответственно 2. Если оно не происходит У дней подряд, то отнимается 1. Требуется написать программу, которая подсчитывает значение после М дней. Формат входных: в первой строке К(начальное значение), во второй строке F(макс... https://www.cyberforum.ru/ pascal/ thread1858302.html
Упорядочить по возрастанию минимальные элементы каждого из векторов Pascal
Использование функций в паскале. Заданы три вектора X=(X1,X2,…,Xn), Y=(Y1,Y2,…,Yn), Z=(Z1,Z2,…,Zn). Упорядочить по возрастанию минимальные элементы каждого из этих векторов. Длины векторов n ≤ 7;m ≤ 9;l ≤ 5. Помогите!
Pascal В матрицы добавить по строке с элементами, равными количеству отрицательных элементов в столбцах Использование процедур в паскале. В каждую из двух матриц добавить по строке, в которой элементы равны количеству отрицательных элементов в соответствующих столбцах. Первая матрица A (N ≤ 10;M ≤ 5), вторая матрица B (K ≤ 7;L ≤ 6). Помогите написать прогу https://www.cyberforum.ru/ pascal/ thread1858012.html
Pascal Сглаживание https://www.cyberforum.ru/ pascal/ thread1857987.html
Помогите решить ,вот код на с# надо тоже самое в паскале сделать public static void Main(string args) { int a = { 7, -6, 2, -5, -2, 6, 6, 3, -7, -2 }; for (int i = 0; i < a.Length; i++) { if (a < 0) { int ii=i; while (ii<a.Length)
Сортировка массива в порядке возрастания модулей элементов Pascal
Дан массив целых чисел. Выведите все элементы массива в порядке возрастания модулей элементов. Даётся сначала число N - кол-во элементов в массиве. N <= 100. Далее через пробел записаны N чисел - элементы массива. Все числа по модулю не превосходят 10000. В случае равенства модулей сначала выводится отрицательные числа, затем положительные. Примеры: Входной файл 3 ...
Pascal Найти все числа, которые отличаются от заданного на две цифры Всем доброго утра! Помогите пожалуйста решить задачу. Задаем определенное число - например 3446234, нужно найти все числа , которые отличаются от данного на две цифры! Заранее огромное спасибо! https://www.cyberforum.ru/ pascal/ thread1857804.html Pascal Найти произведение всех положительных элементов массива Найти произведение всех положительных элементов массива B размерностью 3х3. Добавлено через 53 минуты если кому понадобится n=3; var ar:array of integer; i,j:integer; res:real; begin https://www.cyberforum.ru/ pascal/ thread1857802.html
Найти количество отрицательных элементов главной диагонали массива Pascal
Найти количество отрицательных элементов главной диагонали массива размерностью 4х4.
Pascal Вычислить корень линейного уравнения https://www.cyberforum.ru/ pascal/ thread1857799.html
вычислить корень линейного уравнения y=ax+b
1 / 1 / 1
Регистрация: 28.09.2013
Сообщений: 116
0

Прогамма вычисления суммы ряда, в чем может быть ошибка? - Pascal - Ответ 9807373

23.11.2016, 21:08. Показов 501. Ответов 1
Метки (Все метки)

Студворк — интернет-сервис помощи студентам
создать проект для вычисления выражения S с заданной точностью ε.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
program bars;
const eps=0.000001;
var s,x:real;
i:integer;
begin
writeln('Введите число Х=');
readln(x);
writeln('Введите I=');
readln(i);
s:=0;
i:=1;
while s>eps do begin
s:=s+(power((-1),(i+1))*exp((2*i+1)*ln(x)))/(4*i*i-1);
i:=i+1;
end;
writeln(s:0:8);
end.
https://www.cyberforum.ru/cgi-bin/latex.cgi?<br />
S=\frac{x^3}{3}-\frac{x^5}{15}+...+(-1)^{n+1}\,\frac{x^{2n+1}}{4n^2-1}+...<br />

ε = 10-5; x = 0.3
Ответ: S=0.008838

Вернуться к обсуждению:
Прогамма вычисления суммы ряда, в чем может быть ошибка? Pascal
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
23.11.2016, 21:08
Готовые ответы и решения:

При выполнении вычисления появляется ошибка. В чем может быть проблема
Здравствуйте, при выполнении данного вычисления: d=0.0025; I=35; tv=30; r=1.2*10^-6;...

В чем может быть ошибка?
Не корректно получаются запросы с условием по сумме и интерактивный (любой), либо пусто выдает либо...

В чем может быть ошибка
Цель работы состоит в том чтобы создать электронный альбом. Не удается исправить ошибку, проблема в...

В чём может быть ошибка
Здравствуйте, помогите пожалуйста решить проблемму: Сайт нормально работал в течении года, в том...

1
23.11.2016, 21:08
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
23.11.2016, 21:08
Помогаю со студенческими работами здесь

В чём может быть ошибка?
Не пойму в чём ошибка в программе: #include &lt;iostream&gt; using namespace std; ...

В чём может быть ошибка?
Пишет, что нету точки с запятой. Где??? #include &lt;iostream&gt; #include &lt;string&gt; using...

В чём может быть ошибка?
Прога не открывает файл Дан файл f, содержащий сведения о веществах, указывается название...

В чем может быть ошибка?
function megaDate($timestamp) { global $tpl, $server_time; $diff = time() - $timestamp; ...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru