Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > C/C++ программирование > Общие вопросы C/C++
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 21.10.2011, 12:19   #1
gvilon
Пользователь
 
Регистрация: 06.10.2011
Сообщений: 10
Печаль Нужно переписать процедуры с Паскаля на функции в С++

Есть список. И есть процедуры для вывода списка и удаления первого элемента.
Не знаю как переписать эти процедуры на С++, потому что не знаю как в С++ передать переменную по значению как в procedure showList(Spysok: TList);
и как передать по ссылке как в procedure delElem(var PTB: TList);

Код:
type
  TList = ^List;
  List = record
    inf: byte;
    next: TList;
  end;

var
  first, current, last: TList;

procedure showList(Spysok: TList);
begin
  while Spysok <> nil do
  begin
    writeln(Spysok^.inf);
    Spysok := Spysok^.next;
  end;
end;

procedure delElem(var PTB: TList);
var
  current: TList;
begin
    current := PTB;
    PTB := PTB^.next;
    dispose(current);
end;

Код:
struct TList {
	int inf1;
	TList *next;
};
Буду очень рад, если поможете.
gvilon вне форума Ответить с цитированием
Старый 21.10.2011, 21:16   #2
Syuf
Форумчанин
 
Аватар для Syuf
 
Регистрация: 02.02.2010
Сообщений: 599
По умолчанию

Код:
struct List;
typedef List *TList;

struct List
{
	int inf;
	TList next;
};


TList first, current, last;


void showList(TList Spysok)
{
	for( ; Spysok; Spysok = Spysok->next)
		std::cout << Spysok->inf << std::endl;
}

void delElem(TList &PTB)
{
	TList current = PTB;
	PTB = PTB->next;
	delete current;
}
"Лишь то читается легко, что написано с трудом; что в час написано, то в час и позабыто."
Syuf вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
переписать из паскаля в делфи(выдать уровни на ногу порта) ovram Фриланс 4 04.01.2011 22:04
Переписать задачу из паскаля на СИ Drago56 Общие вопросы C/C++ 1 14.12.2010 17:40
Нужно переписать с sqlite на mysql Maxxxtri23 PHP 0 08.12.2010 19:27
Нужно переписать программу с pascal на С++ ALiKa ALiK Помощь студентам 2 02.05.2010 22:01
как заменить некоторые операторы на процедуры и функции в паскале.Очень нужно! Анастасия1902 Помощь студентам 2 23.02.2010 17:18