20個の数値を逆順に表示

質問

言語Perlで「最大20個までの数値を入力し、それらを逆順に表示するプログラム」はどう作りますか。
教えてください。よろしくお願いします。

回答No.3

moon_night · ベストアンサー

どう？っていわれても漠然としてますね。。。
仕様もあやふやな部分がありますし。
私ならば、
・入力させるところを作る。
標準入力？WEB上でやるの？それともほかのものを使うの？
どのような形で入力させるのか？
・入力されたものを配列に入れる
数字は数桁になるか？
最大二十個と言うのは、数桁のものも含む数字が20個以内なのか、数字（一桁の数字）が20個以内なのか？
・逆順にする
・表示する
表示とはどのような形式で？
と言う順番で作ります。

補足

すみません。。。よくわからなくて申し訳ないです。
この「エラトステネスのふるい」の次の問題のプログラムなのである程度参考にできると思うんですが、
use strict;
my $limit;
my @primes;
print "上限の整数値を入力してください:";
chomp( $limit = <STDIN> );
@primes =(0,0,2.. $limit);
for (my $index =2; $index <= sqrt($limit); $index++)
{

if( $primes[$index] )
{
my $cross_out = $index * 2;
while( $cross_out <= $limit )
{
$primes[$cross_out] = 0;
}
}
}
foreach my $primes_number ( @primes )
{
if( $primes_number )
{
print "$prime_numberは素数です。\n";
}
}

おそらく20個以内の数値入力ならそれらを逆順にして出力して、21個以上なら「20個以内の数値を入力してください。」とやり直しを求める言葉を出力する、といった風なプログラムなのですが、、、

回答No.2

Tacosan

・「数値の入力」はできますか?
・「最大 20回繰り返す」という処理を書けますか?
・「配列を逆順にする」ことはできますか?

回答No.1

okmotokun

質問の真意がよくわかってないのでトンチンカンな回答だったらゴメン！

$num=12345678909876012345;
print reverse(split(//,$num));