Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
2 / 2 / 0
Регистрация: 11.04.2012
Сообщений: 18
1

Не могу найти ошибку в функции

11.04.2012, 19:42. Просмотров 364. Ответов 4
Метки нет (Все метки)

Доброго времени суток.Помогите дописать программу
Вычислить и вывести на экран в виде таблицы значения функции, заданной с по¬мощью ряда Тейлора, на интервале от хнач до xкон с шагом dx с точностью е
Вот что есть:
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
25
26
27
28
29
30
program sem3_3_v2;
var
r,r1,r2,x,y,eps,d,n,k:real;
m:integer;
begin
writeln('введита начало, конец, шаг и точность:');
readln(n,k,d,eps);
writeln('|-----------------------------|');
writeln('| x | y | n |');
writeln('|-----------------------------|');
x:=n;
while x>=k do
begin
r1:=-x;
r2:=1;
r:=r1/r2;
m:=0;
while r1/r2>eps do
begin
r:=r1/r2;
r1:=-x;
r2:=r1/r2;
m:=m+1
end;
y:=1;
x:=x+d;
writeln('|',x:7:2,' |',y:7:2,' |',m:5,' |');
end;
writeln('|-----------------------------|');
end.
0
Миниатюры
Не могу найти ошибку в функции  
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
11.04.2012, 19:42
Ответы с готовыми решениями:

Не могу найти ошибку в функции
не могу найти ошибку, помогите очень срочно надо. вот код #include <stdio.h> #include <stdlib.h>...

Не могу найти ошибку в функции
Всем привет! ) Вот функция, она удаляет (вырезает) совпадения в строках Memo2 ну и в Столбце...

Не могу найти ошибку в процессе минимизации функции
Добрый день. Помогите пожалуйста. Нужно минимизировать функцию с помощью карты Карно. Сначала по...

Табуляция функции (цикл for), не могу найти ошибку
#include <cstdlib> #include <iostream> #include <math.h> using namespace std; int main() {...

4
3941 / 1866 / 337
Регистрация: 16.03.2012
Сообщений: 3,880
11.04.2012, 20:45 2
По-моему
Delphi
1
while x>=k do
нужно писать
Delphi
1
while x<=k do
0
2 / 2 / 0
Регистрация: 11.04.2012
Сообщений: 18
12.04.2012, 11:32  [ТС] 3
Все равно не работает, может есть какие то еще ошибки?
0
3941 / 1866 / 337
Регистрация: 16.03.2012
Сообщений: 3,880
12.04.2012, 12:18 4
Ну ты пиши кокретнее. Как не работает? Легче же будет найти ошибку.
Что-то выдаёт? Или неправильно считает?
0
2 / 2 / 0
Регистрация: 11.04.2012
Сообщений: 18
12.04.2012, 14:45  [ТС] 5
При запуске программа вылетает или выдает ошибку, она даже значений никаких не выводит(
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
12.04.2012, 14:45

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

В функции обратной матрицы, не могу найти ошибку
У меня есть программа для нахождения обратной матрицы написанная на Dev C++. #include &lt;iostream&gt;...

Программа вычисляющая значение функции. не могу найти ошибку
привет!)) помогите пожалуйста найти ошибку в программе. #include &lt;conio.h&gt; #include...

Не могу найти ошибку в функции перевода строк в 16-ричную СС
Привет, есть функция: void calc(int num,int base) { if (num == 0) return; ...

Нахождение максимального в неглавной функции. Не могу найти ошибку
Задача такая - в главной функции создать матрицу заданного размера, по указателю передать ее в...

Не могу найти ошибку в подсчете значения функции и разложения ее по ряду
Нужно сделать табулирование функции y=e(-(x*x)/2) и ее разложение по ряду s на . Есть исходный код,...

Найти ошибку в функции fprintf. не могу разобраться с форматом double
есть структура: struct Abonent { char nomer; double ostatok; char tarif; }arr ; есть...


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

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

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