итерієм автоматично присвоюється завідомо більше число (наприклад, 9999). p> Далі по кожному критерію складається таблиця випробувань (допустимих варіантів), в якій значення розташовуються в порядку зростання з зазначенням номерів, відповідних числу () пробних точок (своїх для кожного).
етап - призначення критеріальних обмежень. Етап виконується проектувальником на основі аналізу таблиць випробувань. По кожному з критеріїв конструктор вказує номер точки, в якій критерій приймає екстремальне значення. p> етап - формування паретовского множини. Етап виконується автоматично. Спочатку визначаються всі точки, що задовольняють всім критеріальним обмеженням. При цьому можлива ситуація, що в силу призначення проектувальником жорстких критеріальних обмежень такі крапки не виявляться. У цьому випадку необхідно повернутися до етапу 2 і послабити вимоги до редуктора, або змінити вихідні дані і вирішити завдання повторно. p> Із загального числа допустимих точок відкидаються ті, для яких можливе одночасне поліпшення всіх критеріїв при переході до якої-небудь точці. Решта неулучшаемие варіанти - парето-оптимальні точки, пред'являються проектувальнику для аналізу і вибору остаточного рішення [2]. p align="justify"> 4 етап - визначення остаточного варіанта з паретовского безлічі проектних рішень.
5. РЕДАГУВАННЯ І транслювання ПІДПРОГРАМИ КОРИСТУВАЧА
Підпрограма користувача являє собою проблемно-орієнтований модуль такого вигляду:
Program FUNC;
var, Imax, bmax, hmax: integer;, n11, n111, u, hrc, hb, kpd, Tl: real;, u2, psil, psi2, ml, m2, B, xl, x2, TII, TIII: real;, SigmaHLim2, NHE1, NHE2, omega1, omega11, omega111,
NHlim1, NHlim2: real;, ZN2: real;, sigmaH2, sigmamin, sigmaHP, sigmaH, NFE1, NFE2, sigmaHk:
real;, YN2, sigmaflim1, sigmaflim2, sigmaFP1, sigmaFP2: real;, aw, awz, m11, mz, zsum, dw2, Ft, d2, b2, Z1C, Z1K, zl, zsum1, z2,
Cz1, Cz2, Czsum1: real;: integer;: array [1 .. 20] of real;: array [1 .. 18] of real;, CSigmaHLim2, CNHE1, CNHE2, Comega1, Comega11,
Comega111, CNHIim1, CNHIim2: real;, CZN2: real;, CsigmaH2, Csigmamin, CsigmaHP, CsigmaH, CNFE1, CNFE2:
real;, CYN2, Csigmaflim1, Csigmaflim2, CsigmaFP1, CsigmaFP2, V, Y1,
Y2: real;, Caw, Cawz, Cm11, Cmz, Czsum, Cdw2, CFt, Cd2, Cb2, dm1, cb,
re, ssinB, del, de2, dae1, dae2, dfe1, dfe2: real;, flagaw, flagaw1: integer;: array [1 .. 100] of real;: array [1 .. 100] of real;: text;, criterionnumber, opt1: integer;: char;, sigf1, sigf2: real;: string;: boolean;
Begin
lim: = true;: = 300;: = 12.4;: = 950;: = 3504;: = 45;: = 302;: = 0.913;
awf1: = 0;: = 0; (fl, 'e: optim optl par.opt');
