n="justify"> il ).
for i: = 1 to n dol: = 1 to stanok [i] dol1: = 1 to stanok [i] dostoimost [i, l]
2. Програмна специфікація
.1 Список ідентифікаторів програми
Використовувані змінні:
rashod - змінна в якій зберігається значення витрат для поточного верстата;
stoimost il - витрати для кожного верстата у вигляді (t = 1, stanok i ; stanok i - кількість верстатів у вигляді i).
max j , min j < span align = "justify"> - масиви, в яких зберігаються дані по максимальному і мінімальному витраті масла, де при:
j = 1 - значення витрати масла;
j = 2 - вид верстата;
j = 3 - номер верстата у вигляді;
name i - масив найменувань видів верстатів (i = 1, n);
stanok i - кількість верстатів у кожному виді (i = 1, n); p>
mas k - масив записів (k = 1, m), що має поля: p>
name - найменування масла;
sklad - кількість масла зберігається на складі ПММ;
zena - ціна 1 одиниці кожного масла;
masla ilk - масив записів (i = 1, n; l = 1, stanok < span align = "justify"> i ; k = 1, m), що має поля:
plan - плановий витрата масла;
fakt - фактичний витрата масла.
2.2 Роздруківка тексту програми.
type
mr = record
rashod: = 0; max [1]: = 0; ('Введіть кількість видів верстатів n ='); (n); ('Введіть кількість марок технічних мастил m =' ); (m); ('Назва видів верстатів');
for i: = 1 to n do ('Вид', i, '-'); (name [i]);; ("Введення кол-ВA верстатів по кожному виду '); i : = 1 to n do (name [...