Rosetta Code

Loops/While: Difference between revisions

Page Discussion

Loops/While (view source)

Revision as of 05:12, 22 July 2010

235 bytes added ,  13 years ago
m
→‎[[Loops/While#ALGOL 68]]: fix pre tag
(J: note)
Line 38:
 
=={{header|ALGOL 68}}==
{{works with|ALGOL 68|StandardRevision 1 - no extensions to language used}}
 
{{works with|ALGOL 68G|Any - tested with release mk15-0.8b.fc9.i386}}
{{works with|ELLA ALGOL 6868G|Any (with appropriate job cards) - tested with release [http://sourceforge.net/projects/algol68/files/algol68g/algol68g-1.818.8d0/algol68g-1.18.0-9h.tiny.el5.centos.fc9fc11.i386.rpm/download 1.18.0-9h.tiny]}}
 
{{works with|ELLA ALGOL 68|Any (with appropriate job cards) - tested with release [http://sourceforge.net/projects/algol68/files/algol68toc/algol68toc-1.8.8d/algol68toc-1.8-8d.fc9.i386.rpm/download 1.8-8d]}}
<lang algol68>INT i := 1024;
WHILE i > 0 DO
Line 47 ⟶ 49:
OD</lang>
Output:
<pre>
<lang algol68> +1024 +512 +256 +128 +64 +32 +16 +8 +4 +2 +1</lang>
</pre>
 
=={{header|AmigaE}}==
Retrieved from "https://rosettacode.org/wiki/Special:MobileDiff/67873"