Форум программистов, компьютерный форум CyberForum.ru

перевести с бейсика - C++

Восстановить пароль Регистрация
 
shax624
8 / 8 / 2
Регистрация: 09.03.2012
Сообщений: 94
05.04.2013, 16:58     перевести с бейсика #1
помогите пожалуйста
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
#include "stdafx.h"
#include "iostream"
using namespace std;
#include <math.h>
 
double func(double *mas, double x)
{ 
    double f =mas[0];
    double t =sqrt(2*x/3.1415926535);
    double z = -x*x*4;
    double k = mas[1];
    double q;
    if (k==3)
    {
        t=t*x;
    }
    do
    {
    q = f;
    f = f-t/k;
    t = t*z/((k+1)*(k+3));
    k=k+4;
    }
    while(f!=q);    
    return f;
}
double Secysh(double x0, double eps, double x, double f,double *mas)
{
    double r = x0 -x;
    x=x0;
    double d = f;
    f= func(mas,x);
    r=r/(d-f)*f;
    x=x+r;
    return x;
}
int main()
{
    double x0 =0.2;          
    double eps = 0.001;
    double x =0.6;
    double *mas = new double[2];
    mas[0] = 0.1818;
    mas[1] = 3;
    double qw = func(mas, x);
    double xxx = Secysh(x0, eps, x, qw, mas);
    cout<<xxx;
    system("pause");
    return 0;
}
Миниатюры
перевести с бейсика  
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
05.04.2013, 16:58     перевести с бейсика
Посмотрите здесь:

C++ Помогите переписать с Бейсика на С/С++
C++ Перевести с С на С++
Перевести из C++ на С. C++
Перевести с С++ на С C++
C++ Перевести из for в while
C++ Перевести с с# на с++
Перевести в С++ C++

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

Или воспользуйтесь поиском по форуму:
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
Ответ Создать тему
Опции темы

Текущее время: 05:54. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2016, vBulletin Solutions, Inc.
Рейтинг@Mail.ru