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

нелинейные уравнения методом ньютона (с Паскаля в С++) - C++

Восстановить пароль Регистрация
Другие темы раздела
C++ Тесты http://www.cyberforum.ru/cpp-beginners/thread1311084.html
Привет всем к вам просьба кто может вот вопрос 7 Вопрос 7 Когда происходит динамическое связывания ответ а во время связоования ответ B во воремя инкапсуляции ответ С во время камиляции
C++ монотон массив { int a={1,8,56,98,25,-9,45,64,17,5,79}; for (int k = 0; k < 12; k++) { bool swaped=false; for (int i = 0; i < 12-1; i++) { if (a>a) { swaped =true; http://www.cyberforum.ru/cpp-beginners/thread1311082.html
C++ Сильноветвящееся дерево
Помогите реализовать произвольное сильноветвящееся дерево и основные функции .
C++ Повышение производительности программы
Добрый вечёр. У меня вопрос. Предопложим у нас есть масив: int numbers; чтобы обратиться к елементу масива используем numbers но во время компиляции с++ переводит такое обращение в обращение *(numbers+n).Вопрос. если воспользоватся в программе вторым способом (тоесть компилятор уже не будет внутренне обращатся к указателям) то повишается производительность программы? или просто быстрей...
C++ Синтаксические ошибки при компиляции классов http://www.cyberforum.ru/cpp-beginners/thread1311042.html
// DiscreteMath_Lab11.cpp: определяет точку входа для консольного приложения. // #include "stdafx.h" #include "stdio.h" #include <iostream> #include <math.h> #include <fstream> using namespace std;
C++ Переделать программу под ввод с клавы Переделайте пожалуйста, тут с файла читает строку, а мне надо что-бы строку вводить с клавы. Тут программа вычисляет сколько раз повторяется первое слово в строке. #include <iostream> #include <string> #include <fstream> using namespace std; int main() { подробнее

Показать сообщение отдельно
Danikor
0 / 0 / 0
Регистрация: 04.06.2014
Сообщений: 33
25.11.2014, 22:58     нелинейные уравнения методом ньютона (с Паскаля в С++)
есть код в Паскале.
помогите перевести в С++.

program Newtons_method;
uses crt;
var a,b,c,E,sol,xp,x:real;
n:integer;

function f(u:real):real;
begin
f:=sqrt(u)-cos(0.387*u);
end;

function h(u:real):real;
begin
h:=0.001*(1+abs(u));
end;

function d(u,g:real):real;
begin
d:=(1/(2*g))*(f(u+g)-f(u-g));
end;

begin
clrscr;
write('Введіть значення початкової точки: ');
readln(x);

write('Введіть степінь точності: ');
readln(E);

repeat
begin
xp:=x;
x:=x-f(x)/d(x,h(x));
n:=n+1;
end;
until (abs(x-xp)<E);

writeln('Розв’язок:',x:8:6,' f(x)=',f(x):8:6,' n=',n);
readkey;
end.
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
 
Текущее время: 02:36. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2016, vBulletin Solutions, Inc.
Рейтинг@Mail.ru