5 lines
90 B
Ada
5 lines
90 B
Ada
|
|
for Value in 0..Integer'Last loop
|
||
|
|
Put (Value);
|
||
|
|
exit when Value mod 6 = 0;
|
||
|
|
end loop;
|