Another update from ingydotnet^djgoku
This commit is contained in:
parent
91df62d461
commit
948b86eafa
7604 changed files with 108452 additions and 22726 deletions
9
Task/Loops-While/ALGOL-W/loops-while.alg
Normal file
9
Task/Loops-While/ALGOL-W/loops-while.alg
Normal file
|
|
@ -0,0 +1,9 @@
|
|||
begin
|
||||
integer i;
|
||||
i := 1024;
|
||||
while i > 0 do
|
||||
begin
|
||||
write( i );
|
||||
i := i div 2
|
||||
end
|
||||
end.
|
||||
Loading…
Add table
Add a link
Reference in a new issue