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

переделать из Паскаль в С++ - C++

Восстановить пароль Регистрация
 
Romantikkk
0 / 0 / 0
Регистрация: 19.10.2012
Сообщений: 144
01.12.2012, 17:48     переделать из Паскаль в С++ #1
Люди, помогите переделать код из Паскаля в С++

Pascal
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
program rabot;
 
{$APPTYPE CONSOLE}
 
uses SysUtils;
 
Var a,b,e,x:real;
 
function Y(x:real): real;
begin
  y:= sin(x)+cos(x);
end;
 
procedure KOR (A,b,e : real);
begin
  if (a>b) or (y(a)*y(b)>0) then write ('HET KOPHEU')
  else
    begin
      while abs(a-b)>=E do
        begin
          x:=(a+b)/2;
          if y(a)*y(x)<0 then b:=x
                         else a:=x;
        end;
      writeln('x=', x);
    end;
end;
 
Begin
  write('a='); readln(a);
  write('b='); readln(b);
  write('E='); readln(E);
  KOR(A,b,e);
  readln;
end.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
01.12.2012, 17:48     переделать из Паскаль в С++
Посмотрите здесь:

Переделать из С++ в С C++
C++ С++ переделать в паскаль
C++ переделать из С в с++
Помогоите переделать программу из Паскаль на СИ вот сама программа C++
C++ переделать из с++ в си
C++ Переделать из С в С++
C++ переделать на с++
Переделать из C# в C++ C++

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

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

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