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

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

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

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

Ответ
 
Опции темы Поиск в этой теме
Старый 14.09.2009, 14:12   #1
ja-vishenka
Новичок
Джуниор
 
Регистрация: 14.09.2009
Сообщений: 1
Вопрос Машина Тьюринга

Построить машину Тьюринга для правильного вычисления функций (в скобках указана система счисления):
f(x)=3x+2, (8)

как это сделать?
ja-vishenka вне форума Ответить с цитированием
Старый 14.09.2009, 14:40   #2
GenniY
Форумчанин
 
Регистрация: 09.09.2009
Сообщений: 181
По умолчанию

А по подробней.
Получил помощь — отблагодарил.
GenniY вне форума Ответить с цитированием
Старый 14.09.2009, 16:02   #3
SuperVisor
Павел Сергеевич
Форумчанин
 
Регистрация: 05.11.2006
Сообщений: 665
По умолчанию

Вот тебе руководство к действию:
Код:
Function DecToOct(_Dec: integer): string; //Десятичное число -> Восьмеричное число
var
  NN: Boolean;
begin
  Result:='';

  if _Dec<>0 then
  begin
    NN:=_Dec<0;
    _Dec:=Abs(_Dec);

    while _Dec>=8 do
    begin
      Result:=inttostr(_Dec mod 8)+Result;
      _Dec:=(_Dec div 8);
    end;

    Result:=inttostr(_Dec mod 8)+Result;
    if NN Then Result:='-'+Result;

  end
  else Result:='0';

end;

function OctToDec(_Oct: string): integer; //Восьмеричное число -> Десятеричное число
var
  i: integer;
  NN: Boolean;
begin
  Result:=0;
  NN:=(_Oct[1]='-');
  i:=0;

  while length(_Oct)>0 do
  begin
    Result:=Result+Trunc(Power(8,i)*strtoint(_Oct[length(_Oct)]));
    inc(i);
    Delete(_Oct,length(_Oct),1);
  end;

  if NN then Result:=-Result;
end;
Познавая других, мы познаем себя.
С'est la vie...
SuperVisor вне форума Ответить с цитированием
Старый 14.09.2009, 21:46   #4
mMAg
Форумчанин
 
Аватар для mMAg
 
Регистрация: 11.08.2009
Сообщений: 433
По умолчанию

Функции перевода числа из десятичной системы счисления в восьмиричную и обратно здесь зачем. Про x в условии ничего не сказано. Проще, если оно в восьмиричной системе счисления изначально задано. Поэтому вполне логично будет их здесь не использовать.

ja-vishenka
Строили МТ в универе 2 курса тому... но подзабыл я как это делать. Но это просто, если есть конспект лекций, а то, что он у вас он должен быть, это наверняка.
Если еще будет актуально, то в течение 2-ух дней решение здесь появится.
mMAg вне форума Ответить с цитированием
Старый 14.09.2009, 21:59   #5
SuperVisor
Павел Сергеевич
Форумчанин
 
Регистрация: 05.11.2006
Сообщений: 665
Восклицание

Цитата:
Сообщение от mMAg Посмотреть сообщение
Функции перевода числа из десятичной системы счисления в восьмиричную и обратно здесь зачем.
Цитата:
Сообщение от ja-vishenka Посмотреть сообщение
для правильного вычисления функций (в скобках указана система счисления):
f(x)=3x+2, (8)
Информации у меня столько же, сколько и у Вас, НО!

Уважаемый mMAg, вот уже вторую неделю с энтузиазмом наблюдаю за Вашей жизнью на форуме. Констатирую: если Вы не в состоянии ответить на вопрос (хотя, зачастую, в состоянии, при том на CPP, если не изменяет мне память моя), то не стоит разводить на форуме флуд. Пишите конкретные вопросы в тему ТС, а не полемику кто и что писал - Вы не умнее всех здесь присутствующих. И нет, я нисколько не пытаюсь Вас унизить, я, как и Вы - не самый умный, однако есть порядок, выработанный годами. Вынужден поставить вам предупреждение.
Познавая других, мы познаем себя.
С'est la vie...
SuperVisor вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Машина Тьюринга и алгоритм Маркова MyLLly Помощь студентам 3 03.12.2012 21:16
Машина Тьюринга и алгоритм Маркова noxi90 Помощь студентам 0 10.06.2009 16:41
Машина Тьюринга ReM Общие вопросы C/C++ 3 28.05.2009 21:19
Машина Тьюринга NoHeart Помощь студентам 3 16.01.2009 20:40
Машина Тьюринга (дробная часть от деления) o1ps Свободное общение 0 03.12.2007 14:02