Алгоритмический язык PASCAL. Алфавит языка. Идентификаторы. Операции над данными, страница 7

Данные  целого  типа  печатаются  в  обычной  форме. Дан-ные  действительного  типа  печатаются  в  форме  с  порядком.

Если  осуществляется  бесформатный  вывод  на  печать,  то  на  печать  действительной  величины  отводится  16  пози-ций. 

Можно  задать  формат печати  ( ширину  пооля  вывода  ).

Для  вывода  на   печать: данных  целого  типа:       

WRITE ( A:m );

данных  действительного  типа:                

WRITE ( A:k : п );

где:  А  –  идентификатор   выводимого на  печать     данного;

m  –  ширина  поля ( число  позиций ), отводи-мая  под  печать  значения   целого  данно-   го   с  учётом  знака “ +” и “ – “;

k  -  ширина  поля ( число позиций ),  отводи-мая  под  печать  значения  данного  дейст-вительного  типа  с  учётом знака  “+” и “-“,  целой  части  числа,  десятичной  точки      и  дробной  части;

n  -  ширина  поля ( число позиций ), отводи-мая  под  печать  значения  дробной  части    числа.

WRITE ( SUM : 9 );

При  значении  SUM,  равном   42564,  на  печать  будет     выведено  

_ _ _ _42563            

WRITE ( NOM : 9 : 4 );

Если  NOM  равен     -54.92,  то  будет  напечатано

_-54.9200

Удобно  при  печати  результатов  обозначать  имена   дан-ных,  значения  которых  выводятся   на  печать:

WRITE (’ Сумма  элементов SUM=’,SUM : 9 );                

Удобно  и  наглядно  перед   оператором  ввода  READ     указывать  имена  вводимых  данных:

WRITE ( ’ Введите     значения    А, В, С ’) ;                

READ ( А, В, С ) ;

9.4. Оператор  безусловного перехода.

Служит  для  передачи  управления  в  программе  к   опе-ратору  с  заданной  меткой,  минуя  часть  операторов  програм-мы.

GOTO  N;

где:  N –  метка оператора,  который  будет  выпол-няться.

GOTO 100;

Метка  должна быть  описана  в  блоке  описания   програм-мы,  причём,  не  более  одного  раза:

LABEL  N;

В  качестве  метки   может  служить  любое  целое  число от  1  до  9999, допускается  использование  в качестве  метки  иден-тификаторов.  Следует  применять  операторы  перехода  для  пе-   передачи  управления  только вниз  по  тексту  программы  ( впе-рёд  ). При  необходимости  передачи  управления  ”назад”  сле-дует  пользоваться  другими  операторами,  например, операто-рами  цикла.  Расстояние  между  меткой  и  оператором    пере-хода  не  должно  превышать  одной  страницы  текста.          

9.5. Оператор  условного  перехода.

Оператор  условного  перехода  применяется  в программах     разветвлённого типа,  когда  одну  из   ветвей  программы    нуж-но  обойти  при  выполнении  определённого  поставленного  ус-ловия.

a)  IFвыражение   THEN  a ; b)  IF   выражение   THEN    a   ELSE   a1 ;

где:   выражение  –  выражение  типа  отношения; 

a – оператор  простой  или  составной ( сложный ),  который  выполняется   при   истинности  постав-ленного условия; 

a1 - оператор  простой  или  составной ( сложный ),  который  выполняется  при  ложности  поставлен-ного  условия.

Если  вторая  часть  оператора 

ELSE   a1

отсутствует,  то при  ложности  поставленного условия  выпол-няется  следующий  по  программе  оператор.

Составным ( сложным )   оператором  называется  последо-вательность  операторов  в  операторных  скобках   BEGIN … END.

IF i>10 THEN  BEGIN

b=20; GOTO  10

END

ELSE   b=0.2;

10:  WRITE (’b=’, b) ;

В  данном  случае  при   i>10  выполняется  составной   опе-ратор

BEGIN

b=20 ;    GOTO     10

END

то  есть,  b=20  и  выполняется  оператор  с  меткой  10, то  есть,  печать   величины   ”b”.

При  i<=10  b=0.2  и   печать  величины  ”b”.

Оператор  условного   перехода  может  быть  расширен  за     счёт  вложенности   других операторов  условного   перехода.  Новое  условие  может  быть  записано  после  ключевых  слов     THEN  или  ELSE.

IF   b1   THEN   a1   ELSE   IF   b2   THEN   a2   ELSE  a3;