Добавил:
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:

книги из ГПНТБ / Соловейчик, Р. Э. Программирование на АЛГОЛ-60 учеб. пособие

.pdf
Скачиваний:
26
Добавлен:
19.10.2023
Размер:
3.78 Mб
Скачать

по

s =l;

w

• - 5;

s =1;

3 =2; a =3;

I

CO

iter ' = 1 + 1

=

2 ;

 

 

new T (opt

) ;

 

 

 

 

 

 

u

f l j -

0

;

 

tH 0

k I:=5;

k 2:=I;

v[5] =

u [l]

 

 

 

 

 

 

^

k I:=2;

k 2:=5;

u[2];

=

vH

 

' •o[2,5]

k I:= 3;

k 2;=2;

v [3 j:

= п[г]*о[г,з]

k I:=4;

k 2:=I;

v [4 >

u [l]+

 

c1 M

lf

-

-

=

0 + 3

=

3 ;

3 - 2

=

I

t

1 . + 1

a

2

;

0 + 2

2 ;

mex = 0;

3

It

*' k 2:=3;

v[3]

-

« И -

c

[1,3]

=

2

- 0

-

 

Ы

 

 

 

 

 

 

 

 

 

 

 

 

 

 

k 2:=4;

v M

“L1!-

0

[ 1 , 4]

=

2

0 -

 

 

k

2:=5;

vf5]

-

u [l] -

c

[

1

5

= ■ 3 - 0

-

 

 

 

, ]

 

 

 

kl:=2; k 2:=3;

v[3j

- u[2]“

0 [2,3]

=

2 - 1

-

 

 

' k

2:=4;

v W

u f2j-

0 [2,4]

=

2 - 1

-

 

 

k

2;=5;

u [2j-

0 [ 2 ,5]

=

3

- I

-

 

 

v f5.I

 

 

 

 

 

op1; = true

 

 

 

 

 

 

 

 

 

Так как величина

opt

приняла значение

мы

переходим к выполнению процедуры

fin

т .

4

=

-2

;

2

=

0

;

3

=

0

;

1

=

0

;

3 = -2 ;

2 = 0 ;

true ,

 

 

fin

Т ?

 

 

 

 

 

 

fe [i : 5] ;

 

 

f

[lj=

60;

fejT2j=

40;

fe[3]= ?0; fe[4] = 50; fejYj = 30 ;

0 4

,

fe[l] =

60

~ 5 0

=

1 0 ;

s3*.

fe[?] =

40

- 20 =

20 ;

b 2 ;

fe[5 ] =

30

~ 20 =

10 ;

s i

fe[l] ,=

1 0

" , 1 0

=

0 0 ;

 

 

 

Ill

Ш в о д

 

 

feflj=

00,

fe[2]=. 20; Хе[з] 1= 20; fe[+J .=» 50; fe[5j= 10 ,

* У Й =

5 !

ЪУ[3] = 2 > ЪуГ4]=

1 f ьУ /5]= I ;

 

 

iter =

2 ;

На этом решение транспортной задачи заканчивается.

Ли т е р а т у р а

1.М а к - К р а к е н . Программирование на АЛГОЛе.

М.,"Мир", 1964.

2.А Л Г О Л-60.(Официальное сообщение), М.,"Мир",.:965.

3.Л а в р о в С.С. Универсальный язык программирова­

ния. М.,"НауИа", 1972.

4.Б е л я в с к и й Е.И., Д е г е н А.Б\ , Э т и н

Ю.Б. АЛГОЛ-60. Л., Гидрометиздат, 1966.

5.Алгоритмы (1-50),(51-100),(I0I-I50). Под ред. М.И.

Агеева. М., изд. Вычислительного центра АН СССР, 1966, 1966,

1967.

— 112

О Г Л А В Л Е Н И Е

 

 

 

Стр.

Введение .....................................

 

3

Что такое алгоритм .

. . . . . . . . . . . .

' 5

Ч и с л а .....................................

••

 

Переменные и идентификаторы переменных . . . .

17

Арифметическое выражение .....................

18

Стандартные функции ..........................

 

22

Оператор присваивания...........

22

Элементы организации программы ...............

25

Метки и операторы перехода ...................

26

Условный оператор............................

 

28

Условие......................................

 

33

Булевские выражения ...................

. . . .

34

Оператор цикла ...............................

 

39

Переменные с индексами . .....................

48

Переключатели................................

 

57

Блоки и их использование....................

59

Собственные переменные .......................

83

Процедуры..............................

... ••

64

Процедура-функция............................

 

75

Обращение с подстановкой наименования и

77

значения

 

 

"

Определение быстрейшего пути .................

81

Расчет критического

пути .....................

86

Решение задачи линейного программирования

 

симплексным методом

.......... , .........*

92

Транспортная задача

...........................

Ю 2

Литература .............................

 

III

Соседние файлы в папке книги из ГПНТБ