Odd and square numbers: Difference between revisions
Content added Content deleted
Not a robot (talk | contribs) (Add PILOT) |
Not a robot (talk | contribs) (Add Draco) |
||
Line 213: | Line 213: | ||
n := n+1; |
n := n+1; |
||
end loop;</lang> |
end loop;</lang> |
||
{{out}} |
|||
<pre>121 |
|||
169 |
|||
225 |
|||
289 |
|||
361 |
|||
441 |
|||
529 |
|||
625 |
|||
729 |
|||
841 |
|||
961</pre> |
|||
=={{header|Draco}}== |
|||
<lang draco>proc nonrec main() void: |
|||
word i, sq; |
|||
i := 11; |
|||
while sq := i * i; sq < 1000 do |
|||
writeln(sq); |
|||
i := i + 2 |
|||
od |
|||
corp</lang> |
|||
{{out}} |
{{out}} |
||
<pre>121 |
<pre>121 |