Распределенные базы данных на примере Oracle. Астахова И.Ф. - 18 стр.

UptoLike

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

18
11 EXIT WHEN ARG > Limit;
12 I :=I+1;
13 Arg
:=
Arg* I;
14 END LOOP;
15 DBMS_OUTPUT
.
PUT_LINE ( Textl ) ;
16 DBMS_OUTPUT
.
PUT_LINE ( TO_CHAR ( Arg ) )
;
17 DBMS_OUTPUT. PUT_LINE (‘
Bkdhfh_
qbkeh
= ‘ II TO_CHAR(I)
);
18 END;
19 /
?s_h^gbfjZkijhkljZg_gguf\ZjbZglhfhj]ZgbaZpbbpbdeZy\ey_lky
pbde mijZ\ey_fuc dexq_\uf keh\hf WHILE. MijZ\e_gb_ lbiZ WHILE
h[_ki_qb\Z_l \uiheg_gb_ pbdeZ ^h l_o ihj, ihdZ mkeh\b_ hij_^_e_ggh_
dexq_\ufkeh\hfWHILE,y\ey_lkybklbgguf (TRUE).Fh^bnbpbjm_fij_
^u^msbcijbf_jbaf_gb\dhgklZglmbaZ^Z\mkeh\b_\uoh^Z bapbdeZdex
q_\ufkeh\hf WHILE.
IJBF?J
4.1.2.2.
SQL> DECLARE
2 Arg NUMBER; --I_j_f_ggZy^ey\uqbke_gbynZdlhjbZeZ
3 I NUMBER; --I_j_f_ggZy-kq_lqbd
4 Limit NUMBER
:=
1000000000000; --=jZgbqgh_agZq_gb_
5 Textl VARCHAR2(80) :
=
NZdlhjbZeqbkeZ\i_j\u_ij_\urZxsbc
1 000 000 000 000 ';
6 --
Bkihegbl_evguc[ehd
7 BEGIN
8 I:=l;
9 Arg
:=
1;
10 WHILE Arg < 1000000000000 LOOP
11 I:=I+1;
12 Arg
:=
Arg* I;
13 END LOOP;
14 DBMS_OUTPUT.PUT_LINE(Textl);
15 DBMS_OUTPUT
.
PUT_LINE ( TO_CHAR ( Arg ) ) ;
16 DBMS_OUTPUT .PUT_LINE ('Bkdhfh_ qbkeh
=
II TO_CHAR(I)
);
17 END;
18 /
NZdlhjbZeqbkeZ
,
\i_j\u_ij_\urZxsbc
1 000 000 000 000
10461394944000 Bkdhfh_ qbkeh = 15
PL/SQL procedure successfully completed.
PbdemijZ\ey_fuchi_jZlhjhf
FOR,
bkihevam_lky\lhfkemqZ_dh]^Z
lhqghba\_klghkdhevdhjZa gm`gh\uihegylvbl_jZpbxpbdeZJZkkfhljbf
ijbf_j jZkq_lZnZdlhjbZeZ aZ^Zggh]h qbkeZH[jZlbl_\gbfZgb_ qlh i_j_
f_ggmxpbdeZhibku\Zlv\[ehd_
DECLARE
g_gm`gh
   11 EXIT WHEN ARG > Limit;
   12 I :=I+1;
   13 Arg := Arg* I;
   14 END LOOP;
   15 DBMS_OUTPUT. PUT_LINE ( Textl ) ;
   16 DBMS_OUTPUT. PUT_LINE ( TO_CHAR ( Arg ) ) ;
   17 DBMS_OUTPUT. PUT_LINE (‘������� ����� = ‘ II TO_CHAR(I) );
   18 END;
   19 /
      ����������������������������������������������������������������
������ ������������ ��������� ������ WHILE. ����������� ���� WHILE
������������� ����������� ������ ��� ���� ���, ����� ��������� �������������
����������������WHILE,������������������ (TRUE).������������������
����������������������������������������������������������������������
������������ WHILE.
������ 4.1.2.2.
SQL> DECLARE
   2 Arg NUMBER; --�������������������������������������
   3 I NUMBER; --�����������-�������
   4 Limit NUMBER := 1000000000000; --�������������������
   5 Textl VARCHAR2(80) :=��������������������������������������
                             1 000 000 000 000 ';
   6 --��������������������
   7 BEGIN
   8 I:=l;
   9 Arg := 1;
  10 WHILE Arg < 1000000000000 LOOP
  11 I:=I+1;
  12 Arg := Arg* I;
  13 END LOOP;
  14 DBMS_OUTPUT.PUT_LINE(Textl);
  15 DBMS_OUTPUT. PUT_LINE ( TO_CHAR ( Arg ) ) ;
  16 DBMS_OUTPUT .PUT_LINE ('������� ����� = II TO_CHAR(I) );
  17 END;
  18 /
���������������,���������������������1 000 000 000 000
10461394944000 ������� ����� = 15
PL/SQL procedure successfully completed.
     ���������������������������� FOR,����������������������������������
�����������������������������������������������������������������������
������� �������� ����������� ���������� ������� ��������� �������������� �����
������������������������������ DECLARE����������


                                                                           18