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

перевести из паскаля в с++ - C++

Восстановить пароль Регистрация
Другие темы раздела
C++ Длина введенной с клавиатуры строки http://www.cyberforum.ru/cpp-beginners/thread1179637.html
Ребят, помогите пожалуйста. В общем при защите лабы возникли проблемы... помогите пожалуйста...
C++ "control may reach end of non-void function" Xcode main.cpp:42:1: Control may reach end of non-void function Выдает такую ошибку, гуглил не помоглу, видимо я туп #include <iostream> using namespace std; int razmer; class Massiv { double *mas; int n; http://www.cyberforum.ru/cpp-beginners/thread1179635.html
Чтение данных из файла в таблицу графического режима C++
Здравствуйте! Назрел такой вопрос: как считать данные из уже созданного файла в таблицу, которая была создана в графическом режиме? Через outtextxy не выходит. Видимо, функция fread здесь тоже не пригодна... Подскажите, пожалуйста
Сортировка методом "быстрая сортировка" C++
Здравствуйте! Имеется структура: struct BMS_Data { int* SortNodesList; double* NodesX; double* NodesY; double* NodesZ;
C++ Дано n точек в пространстве, упорядочить точки по неубыванию их расстояний до начала координат http://www.cyberforum.ru/cpp-beginners/thread1179620.html
Доброго времени суток всем. Прошу помочь с этими заданиям, написать код в c++ 1. Дано n точек в пространстве. Упорядочить точки по неубыванию их расстояний до начала координат.
C++ Найти строки матрицы, где есть эл-т для которого сумма предшествующих равна сумме следующих за ним элементов Доброго времени суток всем. Прошу помочь с этими заданиям, написать код в c++ 2. Вывести строки матрицы, в которых есть такой элемент, что сумма предшествующих равна сумме следующих за ним элементов. подробнее

Показать сообщение отдельно
_KulGun_
 Аватар для _KulGun_
2 / 2 / 1
Регистрация: 27.01.2014
Сообщений: 13
18.05.2014, 17:06     перевести из паскаля в с++
Этот код изначально не компилировался
Кликните здесь для просмотра всего текста

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
program spektr;
uses crt;
type vect=array[1..20]of integer;
var f,g:vect;
      j,i,n:integer;
BEGIN  clrscr;
      write('n='); readln(n);
      for i:=0 to n-1 do
          begin
              write('f[',i,']=');readln(f[i]);
          end;
      for i:=0 to ((n-1)div 2) do
         g[i]:=f[2*i];
       j:=0;
       for i:=((n-1)div 2)+1 to n-1
         begin
                g[i]:=f[2*j]+f[2*j+1];
                if (g[i] mod 2)=0 then g[i]:=0 else g[i]:=1; j:=j+1;
         end;
      writeln(‘spektr=();
     for i:=0 to n-1 do      
          begin
              writeln(g[i],’’);
          end; writeln()); 
readkey;
END.


Я не особо разбирался для чего эта программа вообще, но вот то что получилось
Кликните здесь для просмотра всего текста
C++
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
#include "stdafx.h"
#include <iostream>
#include <cstdlib>
 
using namespace std;
 
int main()
{
    setlocale(0, "russian");
    int *mass,*mass2;
    int n=0,j=0;
    cout << "Введите размер массива ";
    cin >> n;
    mass = new int[n];
    mass2 = new int[n];
    for (int i = 0; i < n; i++)
    {
        cout << "mass[" << i << "]= ";
        cin >> mass[i];
    }
    for (int i = 0; i < (n/2); i++)
    {
        mass2[i] = mass[i * 2];
        j = 0;
    }
    for (int i = (n / 2); i < n; i++)
    {
        mass2[i] = mass[2 * j] + mass[2 * j + 1];
        if ((mass2[i] % 2) == 0)
            mass2[i] = 0;
        else
        {
            mass2[i] = 1;
            j = j + 1;
        }
    }
    cout << "spectr=(" << endl;
    for (int i = 0; i < n; i++)
    {
        cout << mass2[i] << endl;
    }
    cout << ")" << endl;
    delete mass;
    delete mass2;
    system("pause");
    return 0;
}


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