0 / 0 / 1
Регистрация: 24.02.2013
Сообщений: 146
1

Ошибка

19.05.2013, 00:18. Показов 378. Ответов 3
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
C++
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
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
#include <windows.h>
#include <locale.h>
#include <stdio.h>
#include <stdlib.h>
#include <conio.h>
#include <iostream>
#include <ctime>
#include <math.h>
 
using namespace std;
 
int raschet (double b, double a, int n);
int raschet2 (int h, int S);
int raschet3(double a, double b, int h);
double Fun(double x);
 
int main()
{
    setlocale(LC_ALL,"rus");
    double a,b,n,S,h,x,I,f;
 
    cout<<"Введiть верхню межу: ";
    cin>>b;
    cout<<"Введiть нижню межу: ";
    cin>>a;
 
    n = 10;
 
    h=raschet(a, b, n);
 
    S=raschet3(a, b, h);
 
    I=raschet2(S, h);
 
    cout<<I<<endl;
 
    system("pause");
}
 
int raschet(double a, double b, int n)
{
    return (b-a) / n;
}
 
int raschet2(int h, int S)
{
    return S * h;
}
 
int raschet3(double a, double b, int h)
{
    int S = 0;
    for (int x = a; x <= b; x += h)
    {
        S+=Fun(x);
    }
    return S;
}
 
double Fun(double x)
{
    x=sqrt(1 + cos(2.0*x) / 2);
    return x;
}
После ввода нижнего придела ничего не хочет происходить, но приделы заданы это нижний 0 а верхний ∏
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
19.05.2013, 00:18
Ответы с готовыми решениями:

IIS- asp ошибка: HTTP 500.100 - Внутренняя ошибка сервера - ошибка ASP Internet Information Services
Привет! Конфигурация win2000pro sp2, стандартный IIS, IE 5. При попытке обратиться к...

Ошибка при чтении изменений при обмене РИБ: Ошибка при вызове метода контекста (ПрочитатьИзменения): Ошибка записи!
Доброго всем времени суток! подскажи пожалуйста как исправить ошибку: Ошибка при чтении изменений...

Ошибка при добавлении в файл. Ошибка 101: Ошибка записи на диск (Error 101: Disk write error).
Здравствуйте, возникла проблема такого плана. Нужно произвести добавление записи в файл, но после...

Ошибка разбора XML/ Ошибка при вызове метода контекста (Прочитать)
1C 8.2 Документооборот КОРП 1.2 Текст ошибки...

3
5498 / 4893 / 831
Регистрация: 04.06.2011
Сообщений: 13,587
19.05.2013, 00:30 2
Для начала, наведите порядок с типом переменных. Объявлены как double, в функции одни передаются как double, другие - как int. Внутри функции raschet3 тоже непонятное происходит с типом данных переменных.
0
101 / 102 / 43
Регистрация: 06.03.2012
Сообщений: 478
19.05.2013, 02:01 3
C++
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
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
#include "stdafx.h"
#include <windows.h>
#include <locale.h>
#include <stdio.h>
#include <stdlib.h>
#include <conio.h>
#include <iostream>
#include <ctime>
#include <math.h>
 
using namespace std;
 
double raschet (double b, double a, double n);
double raschet2 (double h, double S);
double raschet3(double a, double b, double h);
double Fun(double x);
 
int main()
{
    setlocale(LC_ALL,"rus");
    double a,b,n,S,h,x,I,f;
 
    cout<<"Введiть верхню межу: ";
    cin>>b;
    cout<<"Введiть нижню межу: ";
    cin>>a;
 
    h=raschet(a, b, 10.);
    cout<<"h= "<<h<<endl;
 
    S=raschet3(a, b, h);
 
    cout<<"S= "<<S<<endl;
 
    I=raschet2(S, h);
 
    cout<<"I= "<<I<<endl;
 
    system("pause");
}
 
double raschet (double a, double b, double n)
{
    return (b - a) / n; 
}
 
double raschet2(double S,double h)
{   
     return S * h;
}
 
double raschet3(double a, double b, double h)
{
    double S = 0;
    for (int x = a; x <= b; x += h)
    {
        if (h < 1)  break;
        else S += Fun(x);
    }
    return S;
}
 
double Fun(double x)
{
    x=sqrt(1 + cos(2.0*x) / 2);
    return x;
}
Вообщем код подкорректировал,но дело в том,что разность вашего верхнего и нижнего предела должна быть не меньше делителя,иначе в ответе будет 0
1
0 / 0 / 1
Регистрация: 24.02.2013
Сообщений: 146
19.05.2013, 12:50  [ТС] 4
faLek, понял, спасибо)
0
19.05.2013, 12:50
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
19.05.2013, 12:50
Помогаю со студенческими работами здесь

Ошибка HTTP 500 - внутреняя ошибка сервера при отправке почты.
Я пытаюсь отправить почту и присоединяю к ней письма Вот часть страницы Dim myMail Set myMail =...

ASP: Response.Redirect - не работает, ошибка `500 - Внутренняя ошибка сервера'
Всем привет! Есть в ASP-сраничке такой код: Response.Redirect 'page1.asp?ReturnTo=page2.asp' ...

Загружается до окна приветствия и вылетает ошибка: isass.exe - Системная ошибка
Ребята, помогите кто может... весь день бьюсь безрезультатно... с утра пришёл на работу а сервак...

Ошибка SQL запроса , в базе работает, а через IBQuery в Delphi ошибка
В Combobox загружены имена организаций. Нужно выполнить запрос на вывод всех полей таблицы...


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

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

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