перевести код проги из Паскаля в C++ Builder 6

@semendyay · Регистрация: 15.11.2009

нужно перевести код програмы из Паскаля в C++Builder 6

Pascal

program a1;
Var
   x,x1:real;
Begin
x:=1;
 repeat
  x1:=x;
  x:=(2-x*x*x)/5;
until abs(x-x1)<10e-3;
writeln('x=',x:1:4)
end.

@WolfCF · 07.03.2010, 16:56

е -это погрешность? где она задается?

@semendyay · 07.03.2010, 17:38 **[ТС]**

Программа находит такое значение корня, с каким разница между двумя соседними приближениями не была больше 10-3, выходя из первоначального приближения х0=1.

Добавлено через 24 минуты

Сообщение от Wolf

е -это погрешность? где она задается?

е- это степень, т.е. 10 в -3 степени

@M128K145 · 07.03.2010, 18:52

C

#pragma hdrstop
#include <stdio>
 
#pragma argsused
int main()
{
    double x = 1, x1;
    do
    {
        x1 = x;
        x = (2 - x * x * x) / 5;
    }while(x - x1 < 0.001);
    printf("x = %1.4lf", x);
    getchar();
    return 0;
}

@WolfCF 3309 / 1371 / 110 Регистрация: 28.04.2009 Сообщений: 4,822
	07.03.2010, 16:56	2
	е -это погрешность? где она задается? 0

@semendyay 17 / 17 / 0 Регистрация: 15.11.2009 Сообщений: 37
	07.03.2010, 17:38 [ТС]	3
	Программа находит такое значение корня, с каким разница между двумя соседними приближениями не была больше 10-3, выходя из первоначального приближения х0=1. Добавлено через 24 минуты Сообщение от Wolf е -это погрешность? где она задается? е- это степень, т.е. 10 в -3 степени 0

Опции темы