Главная Промышленная автоматика.

Следует учитывать, что возможная многомерная структура массива «е отражается на соответствующей последовательности чисел «а внешнем носителе, где эта последовательность может быть только линейной, как это определено условиями (2).

Представление чисел на внешнем носителе следует тем же правилам, что и для inreal и outreal, так что возможно, например, ввести с помощью процедуры inreal числа, которые ранее были выведены с использованием outarray.

4. Примеры

procedure outboolean {канал, логическое); value логическое; integer канал; Boolean логическое; comment эта процедура выводит логическое значение в. виде основного символа true или false; if логическое then outsymbol (канал, true, 1) else outsymbol (канал, false, 1)

procedure outstring (канал, строка); value канал; integer канал; string строка; comment вывод строки на внешний носитель; begin integer /;

for i: = \ step ] until length (строка) do outsymbol (канал, строка, i) end

procedure ininteger (канал, целое); value канал; integer канал, целое; comment ввод целого числа, которое представлено на внешнем носителе в виде последовательности цифр, перед которой,, возможно, стоит знак и за которой следует запятая. Любой. другой символ перед знаком не принимается во внимание, begin integer п, k; Boolean b;

целое: = 0; & : = true;

for = while и = 0 do

insymbol (канал, 0123456789--\-, n);

if ft=ll then fe: = false;



if 10 then п: = \;

for й : = 1, й4-1 while « 13 do

begin целое •. = 10Х целое-\-п-1;

insymbol {канал 0123456789--\-,, п) .

end 1;

и~\b then целое : = - целое

end begin

. begin array a[l : 10]; (операторы) outarray (15, a)

begin array 610:1, 1:5]; inarray {\5, b); (операторы)

end.

Следующий, пример иллюстрирует применение процедур inarray и outarray для обращения матрицы, включая передачу элементов матрицы с внещнего носителя и на него. Требуется, чтобы в соответствующих местах программы было помещено описание процедуры обращения матрицы, а также вышеприведенное описание процедуры outstring.

begin integer п;

inreal (5, и); comment перед элементами матрицы, должен быть помещен ее порядок, begin array а\\:п, \:п\; inarray (5, а);

обращение матрицы {п, а, особая); outarray (15, а); , .

go to ex end;

особая: outstring (15, ocoбaя); ex: end



5. Заключительные замечания

Рабочая группа 2.1 не предлагает никаких дальнейших . средств для операций ввода-вывода, но хотела бы обратить внимзниб нз Проект соглашений о вводе-выводе в языке АЛГОЛ-60", предложенный комитетом АСМ по языкам программирования (подкомитет по АЛГОЛу, председатель Д. Э. Кнут), и на обширную библиографию р конце этого отчета.





0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 [21] 22

0.0028