mzp https://blog.hatena.ne.jp/mzp/ みずぴー日記 https://mzp.hatenadiary.org/ Perl 30分プログラム 30分プログラム、その724。またもmixiの課題コミュニティからです。 複数の整数を平均値に近い順にソートするプログラムを作成せよ。平均値は切り捨てして整数値で、平均値との距離が等しい場合は値の小さな方を優先するものとする。 らしいです。うっかりしてて平均値の切り捨てを忘れてました。まあいいや。 使い方 print Dumper(sort_by_avg(4,2,1,3)); # $VAR1 = 2; # $VAR2 = 3; # $VAR3 = 1; # $VAR4 = 4; ソースコード #! /usr/bin/perl # -*- mode:perl; coding:utf-8 -*- … 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fmzp.hatenadiary.org%2Fentry%2F20100120%2Fsort" title="平均値順にソート - みずぴー日記" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> Hatena Blog https://hatena.blog 2010-01-20 00:00:00 rich https://mzp.hatenadiary.org/entry/20100120/sort 1.0 100%