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

Перевод функций из Pascal в С++ - C++

Восстановить пароль Регистрация
 
WeekendSeeker
 Аватар для WeekendSeeker
0 / 0 / 0
Регистрация: 20.04.2013
Сообщений: 15
17.11.2013, 18:59     Перевод функций из Pascal в С++ #1
Всем доброго времени суток. Столкнулся с проблемой перевода кода Pascal в С++.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
1.  var a,k:longint;
2.  function f(n:longint;s:string):integer;
3.  begin
4.    if n=0 then
5.      begin if (pos('555',s)=0)and(pos('999',s)=0)then inc(k);end
6.    else
7.      begin
8.        f(n-1,s+'5');
9.        f(n-1,s+'9');
10.     end;
11.   f:=k;
12. end;
13. begin
14.   readln(a);
15.   writeln(f(a,''));
16. end.
Получил... Вы будете ругаться очень суровым матом на меня ))
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
#include<iostream>
#include<conio.h>
long a,k;
int f(long n, char s )
{
if(n=0)
{
if(pos('555',a)=0)&&(pos('999',s)=0)
{
k++;
}
else
{
f(n-1,s+'5');
f(n-1,s+'9');
}   
f=k;    
}
std::cin>>a;
std::cout<<(f(a,' '));
getch();
}
Естественно не работает.. Не знаю какой командой можно заменить pos ... По моему это функция только паскаля. Прошу о помощи...
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
17.11.2013, 18:59     Перевод функций из Pascal в С++
Посмотрите здесь:

перевод из PASCAL в C++ C++
C++ Перевод из pascal в С
C++ Перевод с Pascal на C++
перевод в C++ из Pascal C++
C++ Перевод из Pascal в C++
Перевод с pascal на c++ C++
Перевод с Pascal на C++ C++
C++ Перевод c Pascal на С++

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

Или воспользуйтесь поиском по форуму:
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
SeeT
 Аватар для SeeT
53 / 23 / 2
Регистрация: 12.10.2012
Сообщений: 132
Записей в блоге: 1
17.11.2013, 19:44     Перевод функций из Pascal в С++ #2
Не уверен, что подойдет для твоего случая, но если посидеть подумать, может натолкнуть на решение проблемы. Вот
Pascal to C++
Yandex
Объявления
17.11.2013, 19:44     Перевод функций из Pascal в С++
Ответ Создать тему
Опции темы

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