Паскаль в примерах. Иринчеев А.А - 38 стр.

UptoLike

ВУЗ: 

ВСГУТУ | Улан-Удэ

Составители: 

Рубрика: 

38
' B ', ' C ', '_', ''''.
Текстовые константы (строки) записываются последовательностью символов (тек-
стом), заключенные в кавычки:
'
x= ', ' параметр ', ' сумма S =',
Пример 13. Определить объем шара V с радиусом R.
Решение. Объем шара определим как
V= 4/3*R
3
*π.
PROGRAM PR13;
CONST PI=3.14;
VAR
V,R: REAL;
BEGIN
WRITE(‘Введите R’);
READLN(R);
V:=4*PI*R*R*R/3;
WRITELN (‘ Объем шара V = ‘, V:8:3);
END.
2.9. Метки и оператор перехода
В Паскале принят естественный порядок выполнения программы - все операторы вы-
полняются последовательно один за другим в том порядке, как они записаны. Однако в прак-
тике возникает необходимость нарушения последовательности выполнения операторов.
Для этого предназначен оператор перехода, который имеет следующую форму записи:
GOTO метка,
где - метка- целое число без знака в диапазоне 1-9999. Это число записывается
перед помеченным оператором и отделяется от него двоеточием:
GOTO 32
10: a:=2;
....
32: y:=x/z;
Здесь после оператора GOTO 32 выполняется оператор с меткой 32. Следует отметить,
что оператор, следующий за оператором перехода, также должен быть помечен. Иначе все
операторы в программе между оператором GOTO и оператором с меткой 32 будут
лишними.
Допускаются буквенные и буквенно-цифровые обозначения меток. Все метки должны
быть объявлены в разделе описания LABEL.
Объявление имеет вид:
LABEL 32;
Допускается объявлять список меток:
LABEL 1,2,A1,FF102;
Пример 14. Определить корни уравнения
AX
2
+ BX + C = 0,
где A,B,C - действительные числа.
PROGRAM PR14;
LABEL 1,2,3,4; 
                       ' B ', ' C ', '_', ''''.
       Текстовые константы (строки) записываются последовательностью символов (тек-
стом), заключенные в кавычки:
             ' x= ', ' параметр ', ' сумма S =',

      Пример 13. Определить объем шара V с радиусом R.
      Решение. Объем шара определим как
           V= 4/3*R3*π.

      PROGRAM PR13;
      CONST PI=3.14;
       VAR
       V,R: REAL;
        BEGIN
         WRITE(‘Введите R’);
         READLN(R);
            V:=4*PI*R*R*R/3;
      WRITELN (‘ Объем шара V = ‘, V:8:3);
        END.

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

     В Паскале принят естественный порядок выполнения программы - все операторы вы-
полняются последовательно один за другим в том порядке, как они записаны. Однако в прак-
тике возникает необходимость нарушения последовательности выполнения операторов.
     Для этого предназначен оператор перехода, который имеет следующую форму записи:
             GOTO метка,
             где - метка- целое число без знака в диапазоне 1-9999. Это число записывается
перед помеченным оператором и отделяется от него двоеточием:
       GOTO 32
                   10: a:=2;
                    ....
                   32: y:=x/z;
     Здесь после оператора GOTO 32 выполняется оператор с меткой 32. Следует отметить,
что оператор, следующий за оператором перехода, также должен быть помечен. Иначе все
операторы в программе между оператором GOTO и оператором с меткой 32 будут
лишними.
     Допускаются буквенные и буквенно-цифровые обозначения меток. Все метки должны
быть объявлены в разделе описания LABEL.
     Объявление имеет вид:
       LABEL 32;

       Допускается объявлять список меток:

      LABEL 1,2,A1,FF102;

      Пример 14. Определить корни уравнения
      AX2 + BX + C = 0,
      где A,B,C - действительные числа.

PROGRAM PR14;
LABEL 1,2,3,4;

                                                                                        38

Страницы