Термист Термомеханическое упрочнение арматурного проката технология, средства, разработка

Управляющая схема алгоритма Тоома - Кука

Рис. 22.1. к разделу "Комментарии к алгоритму Тоома - Кука"

Чарлз Уэзерелл

begin
   long integer [n, u], [n, v];
   integer K, Q, R, q[0:10],r[0:10];
   long integer stack C, U, V, W;
   control stack code;
   integer k, p,s,t, i, j;
   long integer X, Y, Z, w;
   control A;
   Шаг 1;
   Шаг 2;
   while code не пуст do
      while k > 1 do
         шаг 5; шаг 6; шаг 7; шаг 8;
      end;
      шаг 9;
      pop code into A; while А = интерполировать do 
         шаг 11;
         for i=l to 2t do шаг 13;
         for i=2t - 1 downto 1 do шаг 15;
         шаг 16;
      end;
      if k = стоп then return [m, w];
      if A = сохранить then шаг 18; else abort;
   end; * главного цикла *
end; * алгоритма Тоома - Кука * 

Небольшое пояснение к листингу: long - длинный, stack - стек, control - управляющий pop ... into - удалить вершину ... и поместить в, abort - аварийное окончание. Остальные ключевые слова имеют тот же смысл, что в языке Паскаль.

Подготовлено по публикации: Уэзерелл Ч. Этюды для программистов: Пер. с англ. - М.: Мир, 1982. - 288 с. Стр. 125 - 143.

К началу страницы

Web-сайт “Термист” (termist.com)
Термомеханическое упрочнение арматурного проката

Отсутствие ссылки на использованный материал является нарушением заповеди "Не укради"

Редактор сайта: Гунькин И.А. (termist.com@gmail.com)