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

С++ для начинающих

Войти
Регистрация
Восстановить пароль
 
Xumorist
0 / 0 / 0
Регистрация: 19.06.2009
Сообщений: 5
#1

Код из Delphi в C++ - C++

20.06.2009, 01:24. Просмотров 926. Ответов 2
Метки нет (Все метки)

Нужно написать курсовую на C++. Сам я в программировании плохо шарю (не программист). Попросил у народу помощи, помогли. Но решение на Delphi:

Delphi
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
{$APPTYPE CONSOLE}
 
type byteset=set of byte;
 
var d:array [0..9] of longint;
 
procedure c;
var a,b,i:longint;
begin
 a:=0;
 b:=0;
 for i:=0 to 4 do begin
   a:=a*10;
   a:=a+d[i];
   b:=b*10;
   b:=b+d[i+5];
 end;
 if a*9=b then writeln(a,' ',b);
end;
 
procedure r(k:longint;o:byteset);
var i:longint;
begin
 if k>9 then c
 else for i:=0 to 9 do if i in o then begin
   d[k]:=i;
   r(k+1,o-[i]);
 end;
end;
 
begin
 r(0,[0..9]);
 readln;
end.
Помогите пожалуйста переделать на C++.

Условия задачи:

Существует уравнение типа: ABCDE*9=FGHJK. Каждая буква в этом уравнении соответствует определенной цифре от 0 до 9. Нужно найти эти два числа, ABCDE и FGHJK.

(я так понял: существует 2 числа, при делении одного на другое получается 9. при этом числа уникальны. все цифры в них разные)
Добавлено через 3 часа 32 минуты 40 секунд
как сделать так, что бы 2 числа проверялись на наличие в них одинаковых цифр?

может числа задавать рандомно? как вообще задать числа, что бы цифры были разными?
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
20.06.2009, 01:24
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Код из Delphi в C++ (C++):

Преобразовать код С++ в Delphi - C++
Добрый день помогите разобраться с кодом Учу Delphi код написан на С++ В частности интересует алгоритм криптования и...

Переписать код из Delphi в С++ - C++
Вот собственно код,я +- понимаю, что к чему,а переписать в плюсы не могу:( program Project2; {$APPTYPE CONSOLE} uses ...

Перевести код программы из Delphi в C++ - C++
Добрый день! Стоит задача транслировать код из Delphi в C++. Среда Embarcodero. Вроде бы ничего сложного, точки на стрелки меняй себе и...

Этот код написан на С++ или Delphi? - C++
//--------------------------------------------------------------------------- #include <vcl.h> #pragma hdrstop #include...

Перенести код считывания wav-файла на Delphi. - C++
Вот сам код: typedef struct { char id_riff; long len_riff; char id_chuck; char fmt; long len_chuck;

есть код на Delphi нужно реализовать его на C++ - C++
Здраствуйте, есть код на Delphi не могли бы вы помочь реализовать его на C++ var Form1: TForm1; p4:array of TPoint; p8:array...

2
Vourhey
Почетный модератор
6485 / 2259 / 123
Регистрация: 29.07.2006
Сообщений: 12,635
20.06.2009, 01:39 #2
на форуме есть несколько тем о том, как число разбить на цифры. Воспользуйтесь поиском.
0
Xumorist
0 / 0 / 0
Регистрация: 19.06.2009
Сообщений: 5
20.06.2009, 13:05  [ТС] #3
Воспользуйтесь поиском.
так ничего и не нашел
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
20.06.2009, 13:05
Привет! Вот еще темы с ответами:

Как перевести этот код на код Delphi - Pascal ABC
uses crt; const nmax=100; var a:arrayof integer; n,i,k,j,x:integer; begin clrscr; randomize; repeat write('Размер...

Код Java перенести в код Delphi - Java
Помогите перенести из кода Java в код Delphi. Хотя бы не весь код, а саму основу, алгоритм. /* Учебный пример скрипта бота для игры...

Delphi+Php: Возможно ли вставить код php в Delphi (если да, то каким образом) - Delphi
вот такой вопрос у меня возник, если гора не идет к Магомеду, то прийдется Магомеду идти к ней.

Код в Delphi - Delphi
В окне программы в верху есть 3 стандартные кнопки. Как навесить процедуру на кнопку закрыть(там где нарисован крестик)??? пожалуйста...


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

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

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