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

Перевод из Pascal в C++ - C++

Восстановить пароль Регистрация
Другие темы раздела
C++ Синонимайзер на С++ http://www.cyberforum.ru/cpp-beginners/thread1066833.html
Здорова господа!!! Нужно будет написать свой синонимайзер - это программка которая будет находить синонимы в тексте и заменять их на другие, нужно что б она заменила синонимы другими и смысл предложения не поменялся, что б получались хорошо читаемые тексты, что б после обработки этой прогой текст получался такой как будто бы рерайт сделали. Где базу синонимов скачать? И по каком алгоритму саму...
C++ конец файла обнаружен ранее, чем левая фигурная скобка "{" Добрый день. Возникла такая проблема. При компиляции выдаёт мне такую ошибку. c:\users\кирилл\documents\visual studio 2010\projects\program\program\program.cpp(32): fatal error C1075: конец файла обнаружен ранее, чем левая фигурная скобка "{" в "c:\users\кирилл\documents\visual studio 2010\projects\program\program\program.cpp(7)" Делал всё по книге. Вроде бы все фигурные скобки на месте,... http://www.cyberforum.ru/cpp-beginners/thread1066821.html
Поменять местами минимальный элемент и первый отрицательный элемент массива целых чисел C++
Поменять местами минимальный элемент и первый отрицательный эле-мент массива целых чисел.Необходимо использовать указатели и динамическйи массив!
Передать массив I в массив J в обратной последовательности C++
Передать массив I(10) в массив J(10) в обратной последовательности. #include <iostream> using namespace std; int main() { const int SIZE = 10; int I; int J;
C++ Как определить координаты самопересечение ломаной линии через массив? http://www.cyberforum.ru/cpp-beginners/thread1066794.html
Дайте алгоритм действий вот код программы для более ясной картины #include <conio.h> #include <stdio.h> #include <locale.h> FILE *f,*g; struct Point {
C++ Операторы передачи управления (вычислить произведение положительных элементов строки матрицы) Вычислить произведение положительных элементов строки матрицы. При обнаружении 0 должно выдаваться сообщение «Обнаружен 0». #include <iostream> using std::cin; using std::cout; int myfunc(int**matrix,int m,int n){ int res = 1; for (int i = 0; i < m; ++i){ for (int j = 0; j < n; ++j){ if(matrix==0){ подробнее

Показать сообщение отдельно
Crydok
1 / 1 / 0
Регистрация: 16.12.2013
Сообщений: 27
09.01.2014, 18:56     Перевод из Pascal в C++
Помогите,пожалуйста, с переводом программы из паскаля в C++
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
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
uses crt;
function F(x:real):real;
  begin
    F:=1+x-x*x*x;
  end;
var
  A, B, x, e, z, O: real;
  s: string;
  cod: integer;
begin
clrscr;
repeat
    repeat
      write('Введите левую границу A[-100;100]=');
      readln(S);
      val(S, A, cod);
    until (cod = 0) and (A > -100) and (A < 100);
    repeat
        write('Введите правую границу B[-100;100]=');
        readln(S);
        val(S, B, cod);
    until (cod = 0) and (B > -100) and (B < 100);
    until a<>b;
    if A > B then
    begin
      O := B;
      B := A;
      A := O;
    end;
    repeat
      begin
        write('Введите погрешность e[0;1]=');
        readln(S);
        val(S, e, cod);
      end;
    until (cod = 0) and (e > 0) and (e < 1);
    writeln('Левая граница=', a);
    writeln('Правая граница=', b);
    Writeln('Погрешность=', e);
    if F(a)*f(b)>0 then
      writeln('Корней нет')
      else
      begin
        while abs(a-b)>e do
          begin
            z:=(a+b)/2;
            if f(a)*f(z)>0 then a:=z else b:=z;
          end;
          x:=(a+b)/2;
    writeln('x=',x:2:4, 'f(x)=', f(x):2:10);
    readln;
end.
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
 
Текущее время: 14:41. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2016, vBulletin Solutions, Inc.
Рейтинг@Mail.ru