Файл: Килов Х.И. Фортран для БЭСМ-4 (МИФ) учеб. пособие.pdf

Скачать файл
Заказать решение

ВУЗ: Не указан

Категория: Не указан

Дисциплина: Не указана

Добавлен: 25.07.2024

Просмотров: 94

Скачиваний: 0

ВНИМАНИЕ! Если данный файл нарушает Ваши авторские права, то обязательно сообщите нам.

-149 -

9.Таблица символов.,

 

 

код.

Входной!

Символ

j

t

!

код !

 

(АИДУ)

!

t

В

0

 

0

 

012

I

 

I

 

001

Г

2

 

2

 

002

д

3

 

3

 

003

Е

4

 

4

 

004 '

I

5

 

5

 

005

3

6

 

6

 

006

И

7

 

7

 

007

Й

а

•

10

 

010

к

9

I I

 

011

л

+

 

12

 

240

м

-/

 

13

 

241

И

 

14

 

243

0

 

 

15

 

270

п

 

•

16

 

266

р

 

 

177

 

273

с

t

 

21

 

несущ.

т

(

 

22

 

262

У

)

 

23

 

263

ф

=

 

25

 

254

ц

 

 

 

X

1

 

.26

 

267

 

С

 

27

 

264

ч

*

 

30

 

265

ш

 

31

 

242

щ

 

 

32

 

274

ы

><

 

35

 

252

ь

 

36

 

255

э

•

 

37

 

271

ю

А

 

40

 

53

я

Б

 

41

 

212

D

i Входной ! код I код

!ШШ)

4254

43213

44214

4557

46216

47217

50220

51221

5265

53222

54- 67

5562

5671

57223

6072

6155

6276

63103

64224

65102

66225

67226

70227

71230

72205

73206

74207

75210

76

211

77;

56

 

 

150 -

 

 

 

 

Символ ^Внутренний

.[Входной

!Символ

!Внутренний!Входной

1

код

! код

|

!

код

! код

i (АЦПУ )

 

1

!

(ЖГУ) !

F

100

60

PAUS3

 

140

333

0

101

61

FgRllAT

 

141

334

I

102

63

SUBflgUTIHjS

142

335

J

103

64

RETURN

 

143

336

L

104

66

CALL

 

144

337

N

105

70

EQUIVALENCE 146

372

Q

106

73

EXTERNAL

147

373

R

107

74

DEBUG

 

150

350

3

110

75

 

 

 

 

U

I I I

77

 

 

 

 

V

112

100

 

 

 

 

w

113

101

 

 

 

 

z

114

I 9 4

 

 

 

 

END

116

261

 

 

 

 

REAL

117

303

 

 

 

 

FUNCTI0N

121

314

 

 

 

 

STgP

123

317

 

 

 

 

O0T0

124

320

 

 

 

 

IF

125

321

 

 

 

 

Ш126 325

C0MMENT

127

331

READ

130

345

PRINT

131

346

PUNCH

132

347

SP

133

363

0PTI0N

134

371

WRITE

135

315

C0LS

136

370

CgNTINUE

137

332
105-133.

- 151 -

литература

1. FORTRAN vs. Basic FORTRAN. Communications of the

Z 0964), 10, 591-625.

2.Appendixes to ASA FORTRAN, Communications of the ACM,

8 (1965) 5, 287-288.

3.Bennett W.W.- ABACUS - A Past Fortran System For The

IBM/360. The Australian Computer Journal, 1 (1968)j

3, 149-152.

4.Ляшенко В.Ф. - Программирование для цифровых вычисли­ тельных машин М-20, БЭСМ-ЗЫ, БЭСМ-4, М-220.М., 1967, 432 с.

5.Леви Б.Б, - Символический машинный код БЭСМ-4 (СИМКОД). Рига, 7972, 24с.

6. Larson С. - The E f f i c i e n t -Use of FORTRAN. Datamation,

1Z 0971), 15, 24-31.

7. Knuth D.E. - An Empirical Study of PORTRAIT programs.- Softvrare - Рж-actice and Experience, 1 (197D> 2,

8. Knuth D.E. - Tiie Art of

Computer Programming, Vol* 1.

Fundamental Algorithms.

 

Addison - Wesley Publishing Co., 1969t XXI, 634 pp.

9. Wirth N. - Lecture Notes

on a Course i n Systems

Programming, Stanford U.-, Dept. of Computer Science,

1967, У1, 210 pp.

10.Леви Б.Б., Килов Х.И., Арш Э.Ш.

Транслятор с сокращенного и несколько дополненного АЛГОЛа («1ИАТ), Рига, 1971, 40 с.

- 152 -

ДЛЯ ПРЯМОУГОЛЬНОЙ MflTPMUH Д1М.М1 ;

в в г и ти

с "к:

N , м и Э Л Е М Е Н Т Ы П Т О О

м л Т Р и и ы г

Ч П О Н Я Й О Ч И Т Ь

Е Е

ЭЛЕМЕНТЫ

R П О Р Я Д К Е

УСЫЬдНИЯ И ;

Р п ^ti о л ож ит ь

' з и г з л г о о б р лзнп •

по л м д Г о н д лям:;

Д t 1 . 11 .

Д ' 2 .

1 > . Д t Ь

2 » , А М

; 3 1 i

1 ( 7 , а > ,• flI s,

я 1 * . 1 ' .

- 1 1 3 , 2 1 ,

и т .". •;

 

 

 

»E.1t N , M , « J O »

C O L S

М/ ШОП/ I • К ( э,

C N L S M/lOOO/)

• Г О Р М Д Т

(;>///,'исходная

и д т о и П д ' . / / / ) :

P K I N T

го;

 

 

 

 

 

 

D O аl

i • 11 м ;

 

 

 

 

 

0 0

\

l - 2 , N n ;

X-.li

I I ;

0 -

1 - 1 ;

;« I J M l « A i J ) ;

I f

i д i j i .x(2 , i , i ;

1 r

< о . N C . Q ) со то a;

Об^рЛОвднИЕ TPF.64EM0f< мЛТРИцМ;

«i l , l i - д м >;

1 - . i - t ; o i - i ;

0 0 - - 1 ;

:1 1 - 1 • 0 J ;

0 l « J * Q j ;

s;

I F

1 I l , N E • и ) (io T 0

1 F

I J 1 . N E . И + 1 ) GO

то 5;

:0 1 - 1 ;

0 0 - u ;

:o i l . ) !

Г> 0 1 . - 1 ;

G O 10 6 ;

 

O J

- I ;

 

 

G O

10

7;

:

I F

1 <n . N E • о ) G O T o a;

:

' f

( I

I . N E . 11+ 11 GO то 9 •

0 1 - 0 ;

 

 

DO-M

 

:O I l . - l ;

0 0 1 - 1 ;

GO

то

5 ;

: 0 1 - и

 

Приложение. Рис.1.

/, з

 

 

 

 

 

- 153 -

 

 

 

 

 

 

 

D J - о;

 

 

 

 

 

so

 

 

!;o

ю

ю ;

 

 

 

 

 

S I

 

 

Я ; IF [ I I , N £ . N * 1 I Г, П т с 1 1 ;

 

R 2

 

 

IF i J 1 - ( И" 1 ) I 1 2 , 1 4 , 1 4

 

5J

1

1 : IF

I01 ,NE•M* П GO To 1 Л J

 

 

54

 

 

IF

i I 1 -(H-1)115. 14, 14 I

 

 

55

 

< 3 ; I = I 1 ;

 

 

 

 

 

 

4 6

 

 

 

Л » Л , ;

 

 

 

 

 

5?

 

 

 

к(i,j

) =л11 a i;

 

 

 

56

 

 

 

 

I 2-12*

i;

 

 

 

 

59

 

 

 

M - L I I ;

 

 

 

 

 

6 0

 

 

 

0 J - о Л 1 ;

 

 

 

 

 

61

 

 

iu Ю

6;

 

 

 

 

 

 

вг -

 

, П Е Ч А Т Ь

с тлкик T'VJOM

П О Л Ч Ч Е Ч Н О П

мдтрицы;

РЛ

 

'4: Р ь! и г , 6 ;

г j x , 'рпзУльпрУ'ОцдЯ

/1 л т0 И и п ' / /

64

 

-в; Fopf.flT

, г///,

ЕЬ

 

'7; «ОГМДТ

(iOO,2(jX

( 25I5)f

 

 

66

 

 

DU

1 в

| • 1 ,N;

 

 

 

 

 

 

16 P K l N T

17 , < К ( I , J 1 , J..J , М) ;

 

 

^

 

 

P R I N T

1

э;

 

 

 

 

 

6 91

 

 

-9; FORMflT

i ///\25 ('-')) ;

 

 

7 0

 

 

? Т П Й

;

 

 

 

 

 

 

7 1

1

 

2

Е МОз.

4

5

В

7

8

0

l u

 

1 1

12

 

13

14

15

16

17

18

1J

 

20

2 1

 

22

23

2 4

25

26

17

2 J

 

29

30

 

3 1

32

3 3

34

35

J 6

5

7

38

3 9

.

10

4 1

4 2

4 3

44

45

4 б

 

4 7

4в

<9

50

. 51

5 2

S3

54

55

 

5 6

57

 

5а

5 9

6 С

В 1

62

63

6 4

 

65

вв

 

В 7

6В

60

70

ti

72

7 J

 

7 4

75

 

75

77

78

79

80

В 1

8 2

 

;.3

8<

 

85

86

87

88

8'1

80

9

1

 

.12

93

 

94

95

ПР

97

Эй

ss

 

 

 

90

 

 

Э7

9 6

 

9 j

89

7 •?

78

64

S3

да

 

Э5

91

 

88

80

7?

6 S

62

46

9 4

 

92

8'

 

8 1

76

66

6 1

47

45

9 Л

 

66

82

 

75-

67

60

48

44

29

Я5

 

 

3 3

7<

 

68

59

49

43

S3

28

в 4

 

73

69

 

58

50

42

3 1

27

16

7 2

 

70

В*

 

5 1

4 1

32

Я6

17

15

7

1

 

56

52

 

40

3 3

2 5

10

14

7

5 5

 

53

3 *

 

34

24

1П

13

8

6

54

 

 

3 8

зь

 

2 3

20

12

9

5

2

37

 

.5 6-

22

 

21

1 1

Ю

4

3

1

Рис.1.Продолжение.

Смотрите также файлы