Anonymous user
Loops/While: Difference between revisions
no edit summary
No edit summary |
No edit summary |
||
Line 2,035:
{{out}}
<pre>
1024
512
256
128
64
32
16
8
4
2
1
</pre>
=={{header|SQL PL}}==
{{works with|Db2 LUW}} version 9.7 or higher.
With SQL PL:
<lang sql pl>
SET SERVEROUTPUT ON @
BEGIN
DECLARE I SMALLINT DEFAULT 1024;
Loop: WHILE (I > 0) DO
CALL DBMS_OUTPUT.PUT_LINE(I);
SET I = I / 2;
END WHILE Loop;
END @
</lang>
Output:
<pre>
db2 => SET SERVEROUTPUT ON @
DB20000I The SET SERVEROUTPUT command completed successfully.
db2 => BEGIN
db2 (cont.) => DECLARE I SMALLINT DEFAULT 1024;
db2 (cont.) =>
db2 (cont.) => Loop: WHILE (I > 0) DO
db2 (cont.) => CALL DBMS_OUTPUT.PUT_LINE(I);
db2 (cont.) => SET I = I / 2;
db2 (cont.) => END WHILE Loop;
db2 (cont.) => END @
DB20000I The SQL command completed successfully.
1024
512
| |||