Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > C/C++ программирование > Общие вопросы C/C++
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы Поиск в этой теме
Старый 19.05.2009, 20:35   #1
megavolt91
Пользователь
 
Регистрация: 19.05.2009
Сообщений: 24
По умолчанию Переведите кто-то из Паскаля в с++ пожалуйста. Отблагодарю голосами в контакте!!!

Uses crt;
const n=28;
function CosX(x:real):extended;
var p:real;
s,ch,zn:extended;
i:integer;
begin
ch:=1;
i:=1;
s:=0;
zn:=1;
p:=1;
repeat
s:=s+p*ch/zn;
i:=i+1;
ch:=ch*x*x;
zn:=zn*(2*i-2)*(2*i-3);
p:=p*(-1);
until abs(ch/zn)<0.0001;
CosX:=s;
end;
var x,h,yp,yt,pa,po:extended;
i:integer;
begin
clrscr;
h:=2*pi/(n-1);
writeln('Результаты вычислений:':50);
writeln('-------------------------------------------------------------');
writeln('| | | | | Погрешность |');
writeln('| № | x | cos(x) | CosX |-----------------------------');
writeln('| | | | | абсолютная | относительная |');
writeln('-------------------------------------------------------------');
x:=-pi;i:=0;
while x<=pi do
begin
i:=i+1;
yp:=CosX(x);
yt:=cos(x);
pa:=abs(yp-yt);
po:=abs(pa/yp);
gotoXY(1,whereY);
write('|',i:2);
gotoXY(4,whereY);
write(' |',x:7:4);
gotoXY(14,whereY);
write('| ',yt:7:4);
gotoXY(23,whereY);
write('| ',yp:7:4);
gotoXY(32,whereY);
write('| ',pa:10:7);
gotoXY(45,whereY);
write('| ',po:10:7);
gotoXY(61,whereY);
write('|');
writeln;
if i=18 then readln;
x:=x+h;
end;
writeln('-------------------------------------------------------------');
readln
end.
megavolt91 вне форума
Старый 20.05.2009, 22:07   #2
megavolt91
Пользователь
 
Регистрация: 19.05.2009
Сообщений: 24
По умолчанию

Ну помогите пожалуйста
megavolt91 вне форума
Старый 21.05.2009, 00:49   #3
Nitrino
Я ещё только учусь
Форумчанин
 
Регистрация: 06.05.2009
Сообщений: 158
По умолчанию

Опиши саму программу, так как проще её будет написать заново чем переделывать
Nitrino вне форума
Старый 21.05.2009, 22:24   #4
megavolt91
Пользователь
 
Регистрация: 19.05.2009
Сообщений: 24
По умолчанию

http://programmersforum.ru/showthread.php?t=50398
Вот задача. Помогите пожалуйста мне очень надо. Отблагодарю чем смогу!
megavolt91 вне форума
Старый 22.05.2009, 15:08   #5
Sweta
Форумчанин
 
Регистрация: 22.11.2007
Сообщений: 664
По умолчанию

Я то перевела, но это не значит, что все будет работать. Тут еще надо поработать, т.к.
1)write('|',i:2);
выводит на экран | значение i и пропускает две позиции курсора, как это сделать в С++ не знаю, остальные аналогичные, только с выводом определенного кол-ва знаков и пропусков (то же не знаю)
2)gotoXY(4,whereY);- устанавливает курсор на 4-й столбец экрана, как это сделать в С++ не знаю.
Тут еще нужны библиотеки, и помоему саму функцию СosX,необходимо внести в main. Попробуйте сделать сами. А вообще Вы уверены, что это решение Вашего задания?
Неприятности приходят и уходят, а жизнь продолжается!
Sweta вне форума
Старый 22.05.2009, 15:11   #6
Sweta
Форумчанин
 
Регистрация: 22.11.2007
Сообщений: 664
По умолчанию

В этом файле
Вложения
Тип файла: doc Вычислить с точностью е.doc (77.0 Кб, 14 просмотров)
Неприятности приходят и уходят, а жизнь продолжается!
Sweta вне форума
Старый 22.05.2009, 17:55   #7
MaTBeu
Eclipse Foundation
Старожил
 
Аватар для MaTBeu
 
Регистрация: 19.09.2007
Сообщений: 2,619
По умолчанию

Тема закрыта. ТС - штраф за тупость.
MaTBeu вне форума
Закрытая тема


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Приближенное вычисление значения функции cos(x) c++ Отблагодарю голосами в контакте! megavolt91 Помощь студентам 9 25.05.2009 20:26
Уважаемые программисты, нужна ваша помощь отблагодарю деньгами vlad-dj Фриланс 13 10.12.2008 02:39
Переведите на язык Delphi neomaximus Помощь студентам 1 26.11.2008 09:24
Переведите формулу на язык Delphi neomaximus Помощь студентам 3 11.11.2008 12:22