Реализации алгоритмов/Сортировка/Шелла: различия между версиями
Содержимое удалено Содержимое добавлено
Добавил ещё вариант пёрла 5 |
|||
Строка 344:
</source>
== [[w:Perl_v2|Perl (вариант 2)
<source lang="perl">
use feature 'say';
my @a =
say "@a - initial";
for(my $k = int($#a / 2); $k > 0; $k = int($k / 2)){
}
}
</source>
|