Добавил:

ivanov666 Опубликованный материал нарушает ваши авторские права? Сообщите нам.

Вуз:

Башкирский Государственный Аграрный Университет

Предмет:

[НЕСОРТИРОВАННОЕ]

Файл:

книги из ГПНТБ / Кушнерев Н.Т. Программирование для ЭВМ Минск-32

.pdf

Скачиваний:

Добавлен:

24.10.2023

Размер:

11.94 Mб

Скачать

☆

<<< < Предыдущая 1 2 3 4 5 6 7 8 9 10 11 12 13 14 1516 / 2516 17 18 19 20 21 22 23 24 25 > Следующая >>>

г Закрепление 8Л

3 <о -—иг

4 I Ввод числа

нет

6 І Освобождение ВЛ

^Выход ^

Переадресация Иг и чте ние очередного символа

Y Запись числа

WПерекодирование и запись] очередной цифрі/

Рис. 44. Блок-схема программы ввода чисел с перфоленты.

символом «.». Конец массива определяется по символу «*». Блоксхема программы приведена на рис. 44. Программа приведена ниже.

Лист, і

Строка Этинетко

17,

коп

,',21

22,

Адресо

замечая

,11

12\

,<6

#6\

ОТ

ьИ| 1

\40\

11 1 0

S,Aj3-,

О,

J ,

j ,

в>

tf±0

н, .

Р£,В,

3,'

, \

j .

}3\0

Р\Н,П,

/ ,8,

J 1

Л,4>0

0,9,

—

,5,0

п,а,и,

*,0,

•

,И,І

і І

,6,0

3-,А

,К,Р,

'в,л,

;

*,0

J і

,7,0

В,Л,3,

П,Я,И,

,»,2,i

і Л

,8,0

1 1

г,

X,-,2,

1 .

0,9,0

в,ж,

, .

M,C

! ,B A

т ,о,о

К,0,С,В,

0,:,K,,

f,:.(.•.),

1 і по

V,C,

і > і

,2,0

и,н,с,

i/Ii7i*

f,>,K,g,

,3,0

0,С,В,

,Л ,

I .

,4,0

в , у ,

V.J

. 1 * 1 '

і .

,5,0

в,ы,к,

і ,0,

і J

і .

,6,0

В,Л,1

,0,

А,С,й,

•

• * • .

•

j 1

L7,0

1 1

Л,С,В,

і .

к,*

,з„

* , • . ? •

1•

•

,8,0

Б,А,7,

М,А,С,

•

,4,2,.

£,f,A,

,9,0

Ч,С,

,H,2,i, a,,

•

2,0,0

. . . .

А,С

,/1,8,

•

,1 ,3,S

В,,

,R, • ,3i

• .

•

Лист 2

Строка Згикетко

Коп

Лфєсо

замечен

9 , ,11 12, ,

,16

'7,

, ,21

22,

ОТ

\*0\

,1,0

И,Н,С\

Б,Л,1,0

; ,т,0г,ч,к,А,

,2,0

О,

••

,H,I

,iк,*,г,,,А,

• .

1 .

•

,3,0

си,

,n,t,t

£,г,А,

• і .

•

,4,0

И,

Б,л,з,

,5,0

И,1,

, .

3-,Н,А,Ч,

і,

і .

ї ї

і .

i i

I t

,6,0

4,2.

3-,Н,А,Ч,

. . .

•

. L

0,7,0

К,В,

К,Т,

*,0,0,0

, .

,8,0

Т,0,Ч,К,А

К,и,

t,S,B,

t - t

•

, .

0,9,0

£,1,А,

К,И,

/ 1 >

1 0 1

I .

1 . 1

1 - І

•

Г ,0,0

£,2,А,

К,Ч,.

/ 1

1 і

1,1,0

Б,А,9-, .

і і ,P,A

Б,

'•

,2,0

К, . . .

Р,3,В,

4 и і

,3,0

А,

Р,3,В,

5 I 0 I 0 I

і ' і

,4,0

, 1 .

{

1 ,5,0

ї ї

,е,о

, .

і .

•

,7,0

і .

• >

,9,0

•

! .

Начало

программы

обычно. В строке 050 в ячейку индекса И1

засылается

нуль. Ячейка

И1 используется

для получения

адреса

151

очередного элемента массива. В строке 060 записан оператор ЗАКР,

* <; помощью которого за программой	закрепляется устройство ввода
, с перфоленты. Далее операторами	в строках 070 и 080	очищаются
ячейка индекса И2 и рабочая ячейка R + 2. Индексная		ячейка	И2
используется для выборки очередного символа после ввода. В			R + 2

накапливается число, перекодированное из кода ГОСТ в двоичнодесятичную запись. Оператор ВЖ (строки 090 и 100) служит для ввода очередного числа.


Ввод производится в ячейки R и R + 1 до		тех пор, пока не по
явится точка. После ввода проверяется, не введена			ли уже «*», оп
ределяющая конец массива	(строки 110-г-120). Если		символ «*» вве
ден, программа заканчивает	работу (строки	130-М50). Если сим

вол «*» еще не введен, то проводится перекодировка каждого сим вола. При этом выбрасываются из каждого символа в коде ГОСТ первые три нулевых разряда (строки 160-+200, лист 1 и строка 010, лист 2) и формируется десятичное число. В программе для упро щения опущен контроль правильности информации и ее ввода.

Пример 2. На	магнитной	ленте записана	информация в десяти
• зонах одинаковой	длины по	1920 символов	каждая. Вывести эту

информацию на перфокарты по 60 символов на каждую, оставляя последующие двадцать колонок карты свободными. Вывод прекра тить, если для очередной выводимой карты в первых пяти символах

содержится текст							К 0 Н Е Ц . Предполагается,															что			магнитная							лента
установлена				на МЛ, 2 и головки												находятся						перед первой из зон с
указанной информацией.
Программа приведена ниже.
Лист і
Стропа Зтикетна									Коп													Лфеса					и		замечая
S	I	\Н	12,	,	,	,16		'7,	і	I	,21 22,			,	,25, і		і	і	ДО		і	і	і	\| Я \|		і	і	і	,Щ		і
0	\1	\0	,	,	,	,		б,А,3-,			і	0,		,	,	J ,	•,	,	і .		,	і	і	,	t	і	і	,	<	j .
о	,г,о							Р,*,В,			і	J i		і і		j .	r	, . .			,	,	і	,						!	,
О	,3,0		,	,	,	,		,\К,Р,				МХЛ%,,2\				1	1 1	,	1	,	,		і					,		!	,
0	,4,0		і	і	і	і		г,А,к,Р,				ы ,K		,	,	' і	і	і	,	і	і	і	і	і	і	і	і	і	і	J і
0	,5,0		і .		,	і		п,	,	,	,	+ ,9,:			,С^ЧІМІЛІ				і	,											,
О ,6,0 ч,м,л,						,		8,Ж,		,	,	»,\		,М,Лу. ,2								і	і	і	і	і	і	і	і	!	і
0,7,0			,	,	,	,		Н,0,С,Л,$				о,;		,n\0\л,6,0,0,8,									і	,	і	і	і	і • - ! і
о	,е,о		і	і	і	і		л,	,	,	,	* ,3,1,:\С,Ч,ПІКІ								,	,	,	,	,	,	,	, ,	,		\	,
0,3,0			і	і	і	і		П,	,	,	,	у,c,лВ,Ы,В,+,1,									,	,	і	,	і	,	,	,	,		,
1	,0,0		ы,к,		,	,		ч,с,п,			,	В ,ы,В,+				/ , ;	,0,		і	і	і	і	і	,	і	і	і	і	і	і	і
1	\1,0		,	1	,	,		Л,У,Р,			,	-	і 7, 7,7,			7, 7, 7,7			,7,		7, 7, 7 , 4,8,					і	і	і	,	І	і
1	,2,0		1	1	1	1		И,Н,С,			і	В ,ы,81			;\к,0,н,е,ц,						і	і	і	і	і	,	і	і	і	j	,
1	,3,0		1	1	1	I		0,С,В,			і	М,Л,,,2\				і	і	і	і	і	і	і	і	і	і	і	і	і	і	J	і
1	,4,0		,	1 1	1			*/,,	,	,	,	к,:		і І/	і л-'												і	і	і	!	і
t	,s,o		,	,	,	,		к,Ф,с,и,				0				\н,С,Ц{;			, / , ;		,(,H,),				I	,	I	I	,	1	I
1	,6,0		1	1	1	1		Ы,	і	і	і	к	і;	,ы,к\		,	і	,	,	і	і	і	і	і	і	і	і	і	,	j	і
1	,7,0		,	,	,	,		к,	0,с,и,			о	і;	,К,Ф\Н,С,u,;,/,,							,(,*,)			і	і	,	і	і	і	j	і
1	,8,0		1	1	1	1		В,6/,Х,			,	H	I	A,	V і ; J О і			,	,		, \|	,	,	,							!	і
1	,9,0		8,Ы,8,			,		Ы№,		і	і	к,;,ьі,кх.				,	,	,						і	і	і	і	,	,	j	і
2,0,0			, .		,	,	.	н,а,п,			,

1 5 2

Лист 2

Стрта Этикетка

Hon

22,

,75, і

Адреса

замечание

і ,tf

f2,

,f6

IT,

, і ,21

Щ |

,J5|

,1,0

С,Ф,Ї,

К,1

,г,;\В,Ы,8,+

\1\

[

,2,0

ї ї

",C,

Ы,К,;,с\ч,П,К,

,3,0

И.С,

ч ,м,л,;\с,ч

,м,л,

,4,0

В,Ы,Х,

Н,А,и,;\о,

,5,0

*,",1,2,

K,H,

/ ,* ,В,;[1,4,в,

і ,

j і

,6,0

*ІУ,С,Л,

К,0,С,Л,3

0,;

t/7,el\p,f,;

,1 i + i f l i

0,7,0

К,Ф,Н,Е,Ц

К,Т,

K,*,H,E\U

. P

,8,0

6, А

/ 1

;

,P,^B,

> і

0,9,0

с,ч,.м,л,

Р,3-,В,

/ 1

I .

•1 ,0,0

с,ч,п,к,

Р,*,В,

/ 1

1 .

I I

,t,0

П,0,Л,Е,

Р,3-,В,

0,0,0,B\

i .

i j і і

,2,0

і і

1 1 1

1 , 1

1 1. 1

1 1

1 1 1 1 1 1

1 1

1 1 1

В этой программе последовательно читаются зоны с магнитной ленты, информация записывается в ячейки, начиная с ПОЛЕ. За тем подготавливается вывод тридцати двух перфокарт, причем кар та выводится, если она начинается не с текста КОНЕЦ. Вывод про изводится из тех же ячеек, куда была прочитана информация с МЛ. Для этого константа обмена (строка 200) для оператора вывода на

перфокарты формируется перед	выводом	каждой карты. В конце
работы программы выводятся	две чистые	перфокарты (строки
140—170). Программа освобождает только МЛ, 2.
Пример 3. Составить программу печати		свода затрат по темам

по лаборатории (не более 30 человек). Исходные данные по затра там вводятся с перфокарт. На каждой карте отперфорированы фа милии и инициалы сотрудника (первые 25 позиций), далее — номер темы (264-28 позиции) и количество затраченных человеко-дней" (позиции 29 и 30). Остальные колонки пустые. Вслед за перфокар тами с исходными данными помещена одна чистая перфокарта. Известно, что тем всего три и они имеют номера 121, 132 и 148. Результаты расчета вывести на УПч в виде таблицы со следующим заголовком:

	РАСЧЕТ	ЗАТРАТ ПО ТЕМАМ
	ПО	ЛАБОРАТОРИИ 520
'		: ЗАТРАТЫ В ЧДН:
N ••	ФАМИЛИЯ И О

Внизу таблицы напечатать ИТОГО, подсчитав суммарные затра ты по каждой из тем. В последней строке напечатать текст СТАРШИЙ ЭКОНОМИСТ.

153-

Подготовка по 7 зиций строки

к печати

. .Очистка ячеек S121, S132, S148 для суммы затрат

Закрепление ПЧ

Печать заголовка

Очистка счетчика строк А/

Закрепление ВК

пустой

карман

13 Освобождение ВК

	• *		Формирование
	Формирование		Формирование
8	Формирование	н	и печать стро
8	номера строки	н	и печать стро
			ки итогов
	k
9	Пересылка Ф.И.О	15	Печать конца
		15	Печать конца
			таблицы
т	Пересылка зат
т	рат в градзи в
	соответствии с
	номером шифра	16	Освоіонсйение
	Накопление		ПЧ
и	Накопление
и	сумм затрат
	по графам

выход

12Печать

строки

Рис. 45. Блок-схема программы печати свода затрат по темам.

Блок-схема			программы								приведена на рис. 45. Программа																				приводит
ся ниже.
	Аист 1
Строка 3гикеГКО								коп											до			Адресо
9 і		72,	,	,	,'б		'7,	,	, ,21			22,		! » 1		1	.	1	до			,	1		\35\ ,			,	,*0\ 1			.	1		r>*
О \| » ,0		і	і	і	,		6,1,1,			,		о,		і	!	, . .																	і	і			і
0 ,1x0		в,Л,		,	,		*,',8,			1		3 і	і	і	\|	ї ї	!		ї ї								, 1	,	і				,
0	,3,0	1	1	1	1		Р,И,П,			,		' . * >		.	1	.	1	1	1	1							1 1
О	,4,0	1	1	1	1		С,У,		,	,		4 \ '		V і	*	.	•	•	»	1		1	1		1	1		і	,	! .			і	і	>			і
0	,5,0	1	. .		1							* \Л		i , - s j		*,г,і,			1	»		. . . .											і	.	,			і
О	,6,0	1	1	1	1		3,	,	,	,		5,	/	4,в\		,	,	,	1	1		1	.	1	1			.	1		1
О ,7,0							3,/>,#,?,					"\"		і І і . і					1	1		1	1	1	1		°~,л,г\				,		,	i	i	t
0 ,8,0		1	1 1			1	н,д,м,м,					с		у,я^л,е;				,			ч, я,т,и,					, І	г\д-хл\в;					В,К,Я,						і
0 ,9,0							t/,JH,		. ,			с		. >\ 1 ,п,ч,								1	1		1	1		.	1 1		!		1	1	І			і
1 ,0,0		1	I	1	1		К,Д,С		,И,			0,:		3,Я,Г,Л,1,							I	I ' I ' W I				і		і	і	і	і . . . .
1 ,7,0		1	1	1	1		ы,ж,		, .			с,т		;,3у.		,ПхЧ,			1	1		1	1		1	1		.	і .				1	1	1	1
і	,г,о						н,я,с,в,					*,>		з,д\г,л,г,							1	7,		t,(,0,)				і . .					1	1		1		1
'	,3,0	1	р1		'		И,У,		,	,		1\ '•		* ,	j	і	і		.	• к		,Л,І,У,Л					i,	\| - J -					1	1		1		1
1 ,4,0		t	i		l	l	61,М,		і	і				•yf	Ъ,1?,«х				і	і		і	і		і	і		i	.	!			1	1	1	1
1	,5,0	1	.	1	1		К,Д,С,Л,5							і,к\г,Л,А					;\9\			1	і		l	l							1	1		1		1
1 ,8,0		.	K	i	t		й/,Ж, і			,	,	с,г		,,11:,Л,Ч								і . .				і		•	'	!			1	1		1		1
1 ,7,0							К,Д,СЛ,5					4\'		з,"Ч^,5					-\'\		j	1,0,			,	,		•	'	!			1	1		1		t
1 ,7,0		1	Ь	1	1		К,Д,СЛ,5					4\'		з,"Ч^,5					-\'\		j	1,0,			,	,		•	1				1	1		1		t
'	,8,0	1	1	'	1		ЫМ,		,	,		С\Г		•	>А;,л,ч						,	f	i		l	l	;	1	1				1	1		1		1
і	,9,0						Н,0,С,И,					3,1		i,»\rji,6,					" \| '\|		,						;						1	1		1		1
г,0,0							И,Ч,		,	і		Я.;		* 1 .		.	1	1			к	,/7,£,Ч,Я					T и,		.-!-				.	1		.		1
Лист 2 f
Строка Этикпка								ПОП				22,															СЛ		и			ЗЛМЕЧДНИ
Э,	, 1 '	12. ,			,16			,	.	V		22,		,25,					,30								,	,	,i0l			," ,		,			,*5		'
0 , 1 , 0							К ,0 ,М			М ,		К ,0		Н ,8 Л ,			Л		с ,ч		/1J,»,				,3.1		J	Л ,g',8									,	1
0 , 2 , 0							Л			...		*•,0		; N,													,6,Л,4,											4
0 , 3 , 0							3,л,х,Р,					В,И		I	I	I	,								A-		,6 ,Л .5,											і
0 , 4 , 0		еле,			.,.		В.И.У,			,		К ,;		8Л,		,	,								A-		J	,Л ,Sv										*
0 , 5 , 0 ,							К,0,0		,Л ,5			О,;		л, 0, л, С ,;					1,8		1 .3,						•
0„6,0							л,о,к,					Л,У		с J		,0,1,;			6 ,Л				,		.	,	•
0„6,0							л,о,к,					Л,У		с J		,0,1,;			6 ,Л				,		.	,
0 , 7 , 0							л,	,	, .			€		1	1	1*1			•	J	Й , Л , У 7 , + , 5 ,						« , / 7 , 7 ,
0 , 8 , 0							3, , , ,					3 .* f J .* .7																1	,	,	,		,
0,9,0							3.	, . .				3 ,*															,B,0,8,			1
1 ,0,0							< /	, ,	, ,			N															,B,0,8,			1		•	,	,		,
1,1.0																					,	;							j	,	,	,		, <
1,2,0							3, .		,	,		N,						, 1			, •										{		,	,		,		,	%
1,3,0							ИЛ,		,	,		д,и		Г,Л,;,		,	> ,											,	,	j		,	,	,		.		1
1,4,0							к,л,		,	,				' *	. ,	,	,													1								і
																																						і
1 ,5,0							Й,С,Д,			,		+	!			+	, '			,3 я										1
1	,е,о						пс,в,			,		і		0,0,:,			,'		•'	,3 я										1							•
J ,7,0							П ,Й ,И			,		• '1К''• ,+,				о,	,										,8,Л,o\
1,8,0		В,Л,9,			,		ч ,с ,		,	,		• ,	;	;	,0,;,П,ег				Л,Е													,	,	,		,		j
1	,9,8'						Ґ.с,		,	,		• , /		•		З."			Г, л								1					' -'			'		I t
2,8,0		,	,	,	,		м.я,с,			,		: ,	/														,	,	,	1		' -'			'		I t

155

Jlucr З

Строка Зпкетма	Hon -	Адреса	и	замечания
» \ l " 12, , і ,16	17, , , ,21 22] і І#І і і і да І і	1 ь # \| І	і	і \|<W\| і і і I « I , ,

0	х1,0	I	I	I	I	H\H\C,			,
0,2,0		I	I	I	I	7І,У,		і	,
С	,3,0	I	I	I	I	Л,СА,Р,
С	,4,0	I	I	I	I	Л,С,8,			,
е	,},о	I	I	I	I	Л,У,		,	,
Г	,6,0	I	I	I	I	л,с,д,в,
0,7,0		I	I	I	I	Л,У,		,	,
0,8,0		I	I	I	I	Л,СА,Р,
0,9,0		I	I	I	I	л,с,в,			,
1	,0,0	l	l	і	l	л,л,и,			,
1	,і,0	6,6,2,			,	л,с,		,	,
1	\l\0	I	I	I	I	Л,У,Р,			,
1	,3,0	I	I	I	I	И,Р,Н,			,
1	,4,0	I	I	I	I	СИ,		,	,
>	,5,0	I	I	I	I	и,н,с,			,
1	,6,0	•	і	і	і	&,с,т,			,
1	,7,0	I	I	I	I	л,	,	, .
J.	\8J>.	Ь~,Л,1,1,					,	,	і
1	,9,0	і .		і	і	C,V,M,P,
2,0,0		•	I	I	I	h	1	1 1

б,Л,9.;*			+,5,.			,.	і	,	,		,	,	,	,	і	,		,	,	}	,	•
* ,1,7,7*, 7,7,4,							Й, ;,/7,Л,Р,£,',5,													,6,Л,Ао,									1
	1—1—1— — — " — ' — 1 — 1												— 1		1 1	— '			і	і	]		і — '		і	і	і	і	1
* \| / \| « і			1	.	і	і	і і		і		і	1 і		і .		і	і	і	і		і	і	,	,	і		,	і
.'. ,о,0І г-,',:,',										, . .			,	,	,		,	,	,	!									,
*,1,7,7х0,0,О,В,;,О,£',Л,Є^15,
,1,0,5,В,;,Я,,1,											,	,	,	,	,		,	,	,	,	!		'	,	,	,	,	,	,	,
* ,7,7,4\S					,.; ,Л,0,Л,£					,*,5,					,	\|	,	\|		,	,		,	,	,		,	,	,	,
*,>,0,2\3,					.	,	,	і	.		, .		і .														,
' і * і ' і і [ * . * і ' і														і	,	,	,	,	!	,	,		.	,	,	,	,		,
••,',\,+\о,						,	,		,	,	,	,	,	,	,		,	,	,		,	,	,		,	,	,	,	,	,
: , 1, ;,/і\л-,Л,£,											,/ґ,/,2,			1,		,									,	,	,	,	,	,
- ,7,7,7\7					,7 ,7,6,0,0,0,0,0,В,										,		,	,	,		,	,	,		,	,		,	' ,
6,Л,1,1\-,1,						і	і	і	,		,	,	,	,	,		і											,
••,U:A1																		!
S,B,P,:\*,3,						і	і	і	і		і	і	і	і	і	і	і і			j	і	і і і і і і
і	і	і	J	і	і	і	,Н,Е,І7,Р,Я,В,И,Л,6											,Н,Ьі\Й,						,Ц/,И,<Р,Р,						,
: і	/ ,	1 , / Р '		; ,3,н,Г,/!,					*,6,				і	і	і	,	і	і	,		!	,	,		,	,	,	,	,
			1															\|				1.			1 — 1
			5 \ l , 2 , 1 ,
Я,*,і,\									і	, . .			і	і	і		'	. ' !		'	,		,	і	і	і .
••<1.:,s\*,P.i,															,	,	,	,	,		!

СТРОКИ	ЭТИКЕТКИ					коп						Ґ														РДРЕСЯ					И		ЗД
9. ,11	'2.	,	,	,'6	17,	,	,	,21	22,		,		,25) .					,	,	,30\|			, .		,	,35)		,	,	,	,*0\|		,
0,1,0					Ч ,С,		,	,	0	,\,3,Р\Г,Л,4,																		,6,Л,			/',2,
0,2,0					я,с,		.	,	<,3-,л,л							,Л , + ,5										1	,	,	,	,	j	,
0,3,0					Ы,)Н,		,	,	с	J	,'			,1 \ • ,п,4,												і	,	,	,	,	і	,
0,4,0					И ,0, С ,Л ,5				о ,; , < ? , я , г . л , ; ,9,																						\|	,
0,5,0					И,	,	,	,	в.л.в,						,						\|	,	,	,	,	1	,	,	, ,,		\|	, ,
0,6,0	6,Л	.1,3		,					В ,Н												і	,	,	,	,	і	,			,6,Л,1\3,
0,7,0					ч,ч,		,	,	Й	,;	,6,Л\1,3,							+ ,1			,	\|	,	,	, - , - \|			,	,5,Л,1			j	* ,
0,8,0					П,Д,И,			,										. .		.		1									\|	.	'
0,9,0	6,В.6,			,	4,	,	,	,	:	, /	, ;			,S\1			,2,1,				,	\|	,	,	,	,	і	,	,	,	,	і	,
1,0,0					і ,	,	,	,	* •		•			•																\|	•
1,1 ,0					И ,п,		,	,	ЛЛ,г,П\;,								/ ,		,	,	і	,	,	,	,	і	,	,	,	,	\|	,
1,2,0					к ,Й,		,	,	Я	,;	, R,				+1	/ ,		,	,		,	і	,	,	,	,	і	,	,	,	,	\|	,
1,3,0					Я,С	А,		,	*	,7,;				,R\ + ,2,					,		,	і	•,	,	,	,	і	,	,	,	,	\|	,
1,4,0					} ,	, .		,	:	, ;	,		;	J	, Я,Г			,Л	,7		, + ,5										\|	,
1,5,0					СИ,		,	,	:,/,;,						+ , /															\|		,
1,6,0					И,н	,с,		,	В ,6,6,;						\| + .3												,	,	,	,	\|	,
1,7,0					ы,ж,		,	,	О ,7,,						, / 1	;	,П ,4,				,	і	,	,	,	,	i	,	,	,	,	\|	,
1,8.0					К ,0.0		,Л ,5		О ,; ,і					,Я\Г		,П		,7,;			, 9					\						,
1,9,0					ы,ж,		,	,	С	,7,			> ,1 { ; ,П, 4,								,	і	,	,	,	,	і	,	,В ,Л,1,5				,
2,0,0	I	,	,	,	К ,0,С		,И ,		0	,;	,т,Я\Г,Л,8,									; ,5\ ;.(.*.)						,	,	,	,	,	,	1	,

156

Лист 5

Строка Этикетка

Hon

ндресо

замечания

\Н

12,

| « 17,

,21 22,

,25,

ДО

L'i.?

*\c,a,.

0,4,

,Б,Л,і\є,

,2,0

В,У,

i i

. ' I ' I V

, . .

,3*,І

•

в,ы,х,

в,x,;,o\

' .

о ,?xo

с,ч>,в,

^ і і . Л | / '

,П,£

,4,A

,T,b,

! -

,5,0

" , '

,6,0

rtP,y,n,

17,

, •' ,

0,7,6

3-,А,Г,л\;

,3-,А,Г,Л,+

,f,

•

,0,0

ы,ш,

Г , 7 - , , , / | ;

,П,ч,

0,3,0

K,0,C,A,5

0, і ,3-,А1Г,Л,;

,9,

1 і

,0,0

4 , 4 ,

A,t,;

,+jo, . .

•

i .

,'\0

. .•!

[ 1 1 1

—1—1—1—1—1—1—1—1—1—Г7і

,2,0

. 1

, .

,з{о

1 І і

1 1 .

,4\0

1 1 1 і

I 1

1 1

і .

,5,0

(

-r

і . .

,6,0

,7,0

- 1

У,

і .

i. .

і .

,0,0

, .

, ,

,9,0

.yC,

> ,

,0,0

. . . .

ї .

.1.

' .

1 .

і . .

f .

і .

Лист В

Строка Этикетка

Hon

Лфеса

замечай

і \tl

12,

17,

1?»

22,

|25|

да

,35,

,40,

,1,0

3,А,Г,Л,І

K, 1,

1 .

,2,0

*v,

, ,

,3,0

K,T,

,P ,A,C\4,,,,

,4,0

С J,

,3-1A,

(

,5,0

T,P,Aj\

,6,0

(

n,0.

,r\e,

, ,

0,7,0

M,A

, .

•

0,8,0

3,A,rtA,2

KJ,

,9,0

к,т,

1,0,0

i t f i l j

,1,0

7!,A ,B,0iP,

,2,0

' i

а,т,0,Р\и,

,3,0

*>i l5,2\0,

і .

,4,0

3,А,Г,Л,4

і-.1,

Iі

* , T

•

,5,0

* , r ,

,6^0

KJ,

,1,0

K,T,

,8,0

K,T,

,9,0

K,T,

1 .

і і і

і і

2,0,0

, .

і .

1 і

' 1

1 * 1 4 , 7 , 4

і і

і і - •,

і і

Лист 7

Стропа Этикетка				КОП
9 і \11 12,	і	с	,1617,	і	1	,21
0 \1\0 і	і	і і	1	1	I	1

0	,2,0	і	і	і	і
0 ,3,0 3-,А,Г,Л,5
0	,4,0	і	і	,	,
0	,5,0	і	і	і	і
0	,6,0	,	,	,	,
0	,7,0	І	і	і >
0	,8,0	і	і	і	і
0	,3,0	і	і	і >
1,0,0		і	і	і	і
1,1,0		I	I	I	!
1	,2,0	2,А,Г,Л			,6
1	,3,0	і	і	і	і
1 \|4,0		і	і	і	і
/	,5,0	,	i	i	i
1	,6,0	і	,	,	,
1	,7,0	і	,	,	,
і	,8,0	і	,	, .
1	,9,0	,	,	,	,
2,0,0		,	,	,	,

1	I	1	1
I	I	I	,
I	I	I	,
I	I	I	,
l	l	l	l
l	i	t	.
l	i	i	i

, 1 , 1

I 1 1 I

l	l	l	l
l	l	l	l
H,T,		,	і
# 1 7 " ,		і	і
K,T,		і	і
K, T,		і	,
K,T,		,	,
K,T	,	,	,
і	і	і	і
,	,	,	,

Листі

Адреса

замечание

22,

|Я5|

$0\

,35\

,40\

A ,T ,bl,

*ff,

і і

і 1

і і

,«А,н\'

, /V,

- ,

ї ї

ї .

,P\A

J i

М,И,А,ИХЯ,

, И ,

• і

\0,

ї .

• і

і і

1 ,

і і

і і і , , і і і і

j i і

, , , ; l

, , і і і

•

_ l

_ i

_ l _ L |

, ,

, .

- , - , - , - ! - ,

, і , ,

і і і і і і , , і І і ,

- 1 - , - , : I , , , і і і і і і і і і ,

і:

і 1 і , І і і , , , , і , , і ,

, ,

і і і І і і

і і і

і і і і і і і

і і

, і і

і і і і і і і і і і і і і і 1

і і

і і і і , і і

, і

і і і і , і ! і і

[ 11

і і

, і і

і і і

і і

2 ,1 і

і \l , і і і

і і і

, і і

і і

3 ,2 і

і \l і

і і і і , , , і і і і і

і і

4 ,8 , A

•

Kor,

Адреса

•

заме-

Строка Этикетка

9 і ,11 12,

,16

17,

, ,21

22,

|2$|

ф0\

\35\

,40,

0 ,1,0 3-,А,Г ,A,7

AClT,

1 ,

і .

і 1

,2,0

I ,

И,Т,0,Г^0,

,3,0

K,T,

1 1

,4,0

, ,

K,T,

1 1

I - 1

1 . .

,5,0

K,T',

,6,0

K,T,

;

0,7,0

K,T,

)

0,8,0

K,T,

, ',

•

• .

0,9,0

K,T,

і .

1,0,0

3-,Р,Г,Л,8

K,7,

і .

і . t

,1,0

C,T,A,P\UI,

,2,0

,3\K,

\3<0

0,Н,0,М\И,

, , i i j

,*,0

f . 7

і .

і і

,5 ,0

і і

к,ч,

1 ,7,7,7.7,7,7,7,7,7,7,6,

,6,0

H,1,2,1,

1,2,1,

,7,0

і і і і

I J I ? I

,8.0

•

і і

* I S I

і .

,9,0

AM,r,tl,

0,17,P,

4,tb,C,1}\

2,0,0

ї . .

1,0,17,

і . .і. і. і

і •і

,1,0

K,1,0,

K,H,

Лист 9

Строка Этикетка

Kon

Дфесо

зимі

і ,П

12,

,16 17,

,21 22,

,75,

*»|

ь.г*Є

\l,0

•

Б,*,*,

,",л\б,

i .

1^,'

,2,0

* | 1

И і

P,3-,B,

з,

,3,0

п,0,А

,1,

P,9-,B,

,S і

і .

,4,0

S,t

,1,

P,3-,B,

,5,0

3,1,3,2,

P,3-,B,

I .

,6,0

S,l,«,5,

P,3-,B,

1 .

К I.

I. I

,7,0

P,3-,8,

і•

, .

,8,0

" і * , в і

' .

,9,0

Л і '

" і ? і й і

\0{0

,uo

,2,0

,3,0

j^f^Tі

,4,0

J - f

і і

,5,0

,6,0

j - - -

,',0

і .

,8, 0

^ j - ' i

•

,9,0. - ' . .

•

>-*

)

1 1

,0,0

В блоке 3 сначала печатаются две строки, стоящие над таблицей

(строки 090-7-120). Затем

оператор ИЧ (строка 130) обращается к

участку программы

(строки 040+100, лист 5), где производится пе

чать черточек по всей ширине таблицы. Далее печатаются три стро

ки на УПч с названиями граф	таблицы (строки 140-=-190), а за
тем — снова черточки (строка	200). Константы, содержащие текст

заголовка, помещены на листах 6 и 7, причем символы, выводимые различными операторами, частично накладываются.

Блок 6 последовательно вводит перфокарты с исходными дан ными и при вводе последней карты (по условию задачи она пустая) передает управление блоку 13.

В блоках 7-г-Ю заполняются ячейки ЗАГЛ+ - ЗАГЛ+ 8, из кото


рых в блоке 12 печатается			очередная строка		таблицы. Операторы
в строках 0704-090 (лист 2)			записывают пробелы и символ «:» в по
зиции, соответствующие трем последним графам таблицы.
Блок	8 увеличивает	на	единицу десятичный			номер строки N
(строки	100-7-120, лист	2),	перекодирует	его	в символьный			вид
(строки	130-7-140, лист 2). Перекодировка			производится			библиотеч
ной программой ДЦГП,		параметрами при			обращении		к которой
(строка	140, лист 2) являются адрес исходного десятичного							числа
и адрес	первой из двух	ячеек, в которых		получается			символьное
представление результата. В блоке 9 пересылается						фамилия и ини
циалы из поля ввода перфокарт (П07ІЕ)				в соответствующие				пози
ции для	печати (строки	170+200, лист 2 и 010, лист 3).

159

<<< < Предыдущая 1 2 3 4 5 6 7 8 9 10 11 12 13 14 1516 / 2516 17 18 19 20 21 22 23 24 25 > Следующая >>>

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

#
25.10.202312.79 Mб28Кучко А.С. Аэрофотография. Основы и метрология.pdf
#
25.10.202318.43 Mб68Кушманов И.В. Электронные приборы учеб. пособие.pdf
#
27.10.202319.55 Mб20Кушнарев Д.М. Использование энергии взрыва в строительстве.pdf
#
19.10.20232.48 Mб95Кушнарев, Ю. М. Авторулевой Печора учебное пособие для студентов судоводительского факультета.pdf
#
22.10.202314.87 Mб43Кушнер, Б. А. Лекции по конструктивному математическому анализу.pdf
#
24.10.202311.94 Mб38Кушнерев Н.Т. Программирование для ЭВМ Минск-32.pdf
#
25.10.202312.78 Mб35Кушнирская М.Ц. Крашение древесины в производстве мебели.pdf
#
27.10.202320 Mб15Кэтермоул К.В. Принципы импульсно-кодовой модуляции.pdf
#
23.10.20234.75 Mб126Лабинский Ю.В. Корабельные ядерные реакторы учеб. пособие.pdf
#
23.10.20238.6 Mб9Лабозин П.Г. Качество крупнопанельного домостроения.pdf
#
22.10.202312.65 Mб35Лавренко, В. А. Рекомбинация атомов водорода на поверхностях твердых тел.pdf