Форум программистов, компьютерный форум, киберфорум
Наши страницы
С++ для начинающих
Войти
Регистрация
Восстановить пароль
 
Lis Drog
0 / 0 / 0
Регистрация: 11.12.2014
Сообщений: 5
#1

Перевод кода с Pascal - C++

12.12.2014, 05:11. Просмотров 252. Ответов 1
Метки нет (Все метки)

Переведите, пожалуйста, код с Pascal на 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
const
maxn = 10;
var
n: integer;
a: array[1..maxn] of integer;
used: array[1..maxn] of Boolean;
procedure gen(pos: integer);
var
i: integer;
begin
if pos > n then begin
for i := 1 to n do
Write(a[i], ' ');
Writeln;
Exit;
end;
for i := 1 to n do begin
if used[i] then continue;
used[i] := True;
a[pos] := i;
gen(pos+1);
used[i] := False;
end;
end;
 
begin
n := 3;
gen(1);
readln;
end.
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
12.12.2014, 05:11
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Перевод кода с Pascal (C++):

Перевод кода с с Pascal на С++
Совсем не знаю язык Pascal, а нужно перевести кусочек кода с этого языка на...

Перевод кода из Pascal в С++
Люди добрые прошу помочь в переписи кода из Pascal в С++, помогите пожалуйста...

Перевод кода из Pascal/VB в C++
Помогите пожалуйста перевести код в С++. Сдавать уже скоро, и я никак не...

Перевод кода из Pascal в C++
Народ прошу помощи с переводом кода Паскаль в С ++ var i,n:integer;...

Перевод кода с Pascal
var k,n,m:integer; x,s,p,t:real; begin repeat write('x<>0 x=');{х в...

перевод кода из Pascal в C++
помогите, пожалуйста, перевести этот код в C++ :impossible: program chisla;...

1
zss
Модератор
Эксперт С++
6959 / 6521 / 4139
Регистрация: 18.12.2011
Сообщений: 17,209
Завершенные тесты: 1
12.12.2014, 05:23 #2
Лучший ответ Сообщение было отмечено SatanaXIII как решение

Решение

Это тот самый случай, когда достаточно знать синтаксис языка и не забыть,
что массивы в С начинаются с нуля.

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
#include <iostream>
using namespace std;
const int maxn=10;
int n;
int a[maxn];
bool used[maxn];
void gen(int pos)
{
    if(pos>=n)
    {
        for(int i=0;i<n;i++)
            cout<<a[i]<<' ';
        cout<<endl;
        return;
    }
    for(int i=0;i<n;i++)
    {
        if(used[i])
            continue;
        used[i]=true;
        a[pos]=i;
        gen(pos+1);
        used[i]=false;
    }
}
 
int main()
{
    n=3;
    gen(0);
    system("pause");
    return 0;
}
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
12.12.2014, 05:23
Привет! Вот еще темы с решениями:

Перевод кода из Pascal в С++
Здравствуйте, я недавно занимался программированием в школе. Я попытался...

Перевод кода с Pascal на C++
Помогите, пожалуйста, перевести задачу на C++ var sum, S, Mp, Ch: real; i,...

Перевод кода из Pascal в C++
Нужна ваша помощь в переводе с паскаля ибо не особо знаком с конструкциями си....

Перевод кода с Pascal на C++
program с4; var k: integer; {введенное число} n: integer; ...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru