Введение в технологию программирования. Часть 3. Проект OLYMPUS-D. Коржов Е.Н - 72 стр.

UptoLike

Составители: 

72
U[i] := 0;
end
;
for i := 0 to Ny do
begin
y := i*Hy*H;
VelocityProfile.Chart1.Series[0].Add(y,U[i],’*’,clGreen);
end;
end; { TCronus.ToolButton4Click }
Рис. 19. Окно с профилем продольной компоненты вектора скоро-
сти в серединном сечении полости
На рис. 19 представлен профиль продольной компоненты вектора ско-
рости в серединном сечении полости для 10 характерных точек. Отметим,
что величина скорости и значении вертикальной координаты выдается на
графике в размерном виде. Напоминаем, что все вычисления проводились
в безразмерных
переменных, но окончательные результаты в таблицах и на
графиках принято представлять в размерных переменных.
            U[i] := 0;
      end;
   for i := 0 to Ny do
      begin
          y := i*Hy*H;
          VelocityProfile.Chart1.Series[0].Add(y,U[i],’*’,clGreen);
      end;
end; { TCronus.ToolButton4Click }




    Рис. 19. Окно с профилем продольной компоненты вектора скоро-
           сти в серединном сечении полости

    На рис. 19 представлен профиль продольной компоненты вектора ско-
рости в серединном сечении полости для 10 характерных точек. Отметим,
что величина скорости и значении вертикальной координаты выдается на
графике в размерном виде. Напоминаем, что все вычисления проводились
в безразмерных переменных, но окончательные результаты в таблицах и на
графиках принято представлять в размерных переменных.



                                       72