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

Алгоритм на С/С++ не могу перевести в Паскаль! - C++

Восстановить пароль Регистрация
Другие темы раздела
C++ Очень редкий учебник по Си. Стивен Прат. http://www.cyberforum.ru/cpp-beginners/thread426623.html
Вот есть книга на гугле , "Язык программирования С. Лекции и упражнения. Стивен Прата" , может у кого то она есть , или кто-то поможет с ссылочкой. Нужна именно она. Помогите пожалуйста...Очень нужна. http://books.google.ru/books?id=SOLy5EmvkzsC&printsec=frontcover&hl=ru#v=onepage&q&f=false
C++ Необходимы пояснения по коду Здравствуйте знатоки C++. Прошу не бранить меня сильно за мои вопросы. Только начал изучать C++. Изучаю очереди. Нашел тут хороший топик - http://www.cyberforum.ru/cpp-beginners/thread178335.html . Из него почерпнул некоторые знания. Но есть не большой кусок кода, который я не могу понять. Если кто может, поясните мне данный код. А именно последние 2 строки кода. Что это за переменная tail? head... http://www.cyberforum.ru/cpp-beginners/thread426615.html
описание программы C++
#include <stdio.h> #define MIN(a, b) ( (a) > (b) ? (b) : (a) ) #define MAX(a, b) ( (a) < (b) ? (b) : (a) ) #define MIN3(a, b, c) ( MIN(MIN((a), (b)), (c)) ) #define MAX3(a, b, c) ( MAX(MAX((a), (b)), (c)) ) #define MIDDLE(a, b, c) ( (a) == MAX3((a), (b), (c)) ? MAX((b), (c)) : (a) == MIN3((a), (b), (c)) ? MIN((b), (c)) : (a) ) int main(void){ int a, b, c;
Стек: функция удаления и переприсвоение массива (Builder 6) C++ Builder
И еще, одна проблема, как всегда стек=/ Ребятки, помогите чем можете, пожалуйста- я замучалась.. есть задача на стек в архиве(сделана и работает) но есть одно но! Мне надо переделать функцию удаления элемента стека=( void udal(TStek & s) { // уменьшаем количество при наличии элементов if(s.kol>0)
C++ создание прошитого бинарного дерева http://www.cyberforum.ru/cpp-beginners/thread426564.html
есть файл fIn.txt A BC D_IF ___L то есть _ значает что потомка нет (например у B потомок только B, второго нет); , информация может быть какой угодно. Вопрос КаК построить это дерево если допустим я написал класс
C++ Определить номер той строки, в которой больше всего согласных букв Переведите, пожалуйста: Uses CRT; Var f,f2:text; s,s2:string; i,l,n1,n2,n,max,ind,c:integer; begin Assign(f,'D:\1.txt'); Assign(f2,'D:\2.txt'); подробнее

Показать сообщение отдельно
auqarisu
5 / 5 / 0
Регистрация: 11.04.2011
Сообщений: 77
12.01.2012, 01:12     Алгоритм на С/С++ не могу перевести в Паскаль!
Всем привет! Пишу курсовую по дискретной математике, задание написать архиватор текста! В книге Д. Ватолин, А. Ратушняк. - Методы сжатия данных, устройства архиваторов. Выбрал метод LZ78 и там дан пример алгоритма на С++ или С точно не могу сказать.
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
n  =  1;
while   (  !  DataFile.EOF()   ){
s = DataFile.ReadSymbol; // читаем очередной  символ
/'пытаемся  найти в словаре фразу,  представляющую
собой конкатенацию  родительской  фразы с номером л и
символа s; функция  возвращает номер искомой  фразы
в phrase_num;  если же фразы нет, то phrase_num
принимает  значение 1, т. е. указывает на пустую  фразу
*/
FindPhrase  (&phrase_num, n,  s ) ;
if  (phrase_num  != 1)
/*такая фраза имеется в словаре, продолжим  поиск
совпадающей  фразы максимальной  длины
*/
n = phrase_num;  '
else {
/*такой фразы нет, запишем в выходной файл код;          :
INDEX_LN - это константа,  определяющая  длину
битового представления  номера n
*/
CompressedFile.WriteBits  (n, INDEX_LN);
CompressedFile.WriteBits  (s, 8) ;
AddPhrase  (n, s ) ; // добавим фразу в словарь
n = 1; // подготовимся к следующему шагу
// признак конца файла
CompressedFile.WriteBits  (0, INDEX_LN);
Времени у меня осталось мало, решил писать на паскале. С++ мы проходили но я его не очень хорошо понял, по сравнению с паскалем.
У меня возникла проблема. Что есть - "CompressedFile.WriteBits" ? В начале я думал это выходной файл в который записывается результат кодирования, но мне сказали что это какой то класс. Объясните пожалуйста!

З.Ы. Может вы знаете более простой алгоритм а реализации на паскале?
ссылка на скачивание книги
 Комментарий модератора 
А вот выкладывать книги без разрешения автора не надо!
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
 
Текущее время: 23:49. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2016, vBulletin Solutions, Inc.
Рейтинг@Mail.ru