Perlで実行は確認できましたただし・・・

質問

printfの書式指定
書式を指定してデータを出力できる。

printf("1");
文字列をそのまま表示

printf("%d",1);
リテラルを書式指定して表示

$a=1;
printf("%d",$a);
変数を書式指定して表示

%dは整数を表示する書式指定です。
%d自身は表示されません。

書式
%d:　整数（少数点の付いていない数）を10進数で表示→　2,3,-3
%x:　整数を16進数で表示→　1,a
%X:　整数を16進数で表示→　1,A
%f:　実数（少数点の付いている数）を表示→　1.00000,0.1111
%c:　整数をASCIIコード表に対応する文字で表示→　a,A
%S:　文字列を表示→　A,ABC,あ

桁数
printf("%4d",25);
空白を含めて4文字で表示
_ _ 2 5

printf("%04d",25);
0を使って4文字で表示
0 0 2 5

printf("%.3f",3.14);
少数点以下を3文字で表示
3 . 1 4 0

$a=10;
変数$aに10を代入。

$b=3.14;
変数bに3.14を代入。

printf("%10d\n",$a);
10を表示。

printf("X%8.5f\n",$b);
X　3.14000を実数として表示。

printf("-" x 10 . "\n");
-　を10回表示させる。

printf("%10f\n",$a*$b);
$aと$bをかけたものを実数として表示する。

とありますが
printf("%10d\n",$a); の　%10　の意味が良く分かりません。
printf("X%8.5f\n",$b);　の　%8.5　の意味が良く分かりません。
printf("%10f\n",$a*$b);　の　%10　の意味が良く分かりません。
printf("X%8.5f\n",$b);　の実行結果は左に一桁ずれていますなぜですか。
ご教示お願い致します。

回答No.2

kalze · ベストアンサー

Perlではスクリプト（プログラム）中で明示的に型を指定しなくてもPerlが判断して適切に扱い、場合によってはキャスト（型変換）してくれます。
しかし、内部的には変数の型は存在しますので、型についての知識は持っておくべきです。

printfの書式指定でのfはfloat型（浮動小数点型）を意味します。
float型は±10^-38～10^38の範囲の値を保持できます。
ただし、有効桁数は７桁になります。

float型を乗算すると、float型の値の範囲では保持できない精度になりますので、double型になります。
double型は、±10^-308～10^308の範囲の値を保持できますが、有効桁数は15桁です。

有効桁数は精度を表します。

>printf("%10d\n",$a); の　%10　の意味が良く分かりません。

書式指定文字dは整数を意味します。
%と書式指定文字のdの間の数値は表示桁数を指示しており、この場合はスペースで足りない部分を埋めて10桁にします。

結果は、
*********1
と表示されるはずです。
（スペースを*で表しています）

>printf("X%8.5f\n",$b);　の　%8.5　の意味が良く分かりません。

8.5の意味は、整数部8桁、小数部5桁で表示です。
この場合、結果は以下のようになります。
*3.14000

実際には8桁ではないと思われるかもしれません。
これは、最初に書いた有効桁数の問題です。
実際にはfloatは全部で7桁の数値しか保持できません。
この7桁には符号は入りません。
そのため、有効桁数の範囲までしか実際には表示されないわけですが、3の前のスペースは、符号を表しています。
この場合＋であるため、明示的に表示されていません。

>printf("%10f\n",$a*$b);　の　%10　の意味が良く分かりません。

float型を10桁で表示です。
10桁というよりも、厳密には最大10文字まで表示です。
結果は以下のようになります。
**3.140000
全部で10文字になっているのがわかるかと思います。
float型の有効桁数は7桁ではなかったのか？なぜ一つ前のと変わるのか？と思われるかもしれません。
それは値の指定部分にfloatの乗算が入っているからです。

float型を乗算すると、容易にfloat型よりも有効桁数が大きい値が生まれるため、float型の乗算結果はdouble型になります。

つまり$a*$bという乗算の結果であるdouble型を指定していることになります。

そのため、指定されている値の有効桁数は15桁になるため、10文字で足きりできることになります。

>printf("X%8.5f\n",$b);　の実行結果は左に一桁ずれていますなぜですか。

これはすでに書いてあるとおり、実際には空白部分には＋があるためです。
（＋は明示しなくても＋の数値を意味するため）

変数については、Perlが自動的に判別してくれるために、プログラミング中には意識しなくても動くものは作れます。
しかし、内部的には型は存在するため、値の精度が重要である場合にはきちんと変数の型を意識することが重要です。
そういった意味では、小数を扱う場合、２進数で表現できるものとできない値があります。
そのため、実際とは異なる数値になってしまうことがあります。
このあたりも値の精度が必要であればよく検討されたほうがよいでしょう。

お礼

ありがとうございました。

回答No.4

BLUEPIXY

>printf("X%8.5f\n",$b);　の　%8.5　の意味が良く分かりません。
この場合
"8"は最小限必要な（確保される）幅が８であることを表しています。(整数部の桁を表すわけではありません）
８桁で収まらない場合、そのまま表示されます。
.5 は、小数点以下の表示に５桁使うことを表します。

概ねＣのprintf と同等な動作をするのですが、違う部分もあります。
詳しくは
perldoc -f sprintf
を参照して下さい。

回答No.3

sakusaker7

#2の内容に関して。

Perlでは浮動小数点数を表すのにCでいうdouble (可能であれば long double)を使用し、floatを使うことはありません。

また、Cではprintfの書式指定の %f は、floatとは限りません。
なぜなら関数に渡される時点で自動昇格のルールに従ってfloat→doubleのpromotionが行われるからです。

もうひとつ、ある型で値を保持できないときに自動的に上位の型(たとえばfloat→double)に型が変わるなんてことは行われません。
まあ初めからfloatで計算なんてしてないんですけど。

回答No.1

PrintScree

printf関数はＣ言語のprintf関数を勉強すれば理解できます。

>printf("%10d\n",$a); の　%10　の意味が良く分かりません。
10桁の整数を10桁で右寄せ表示。

>printf("X%8.5f\n",$b);　の　%8.5　の意味が良く分かりません。
整数部8桁、小数部5桁の小数点の表示。

>printf("%10f\n",$a*$b);　の　%10　の意味が良く分かりません。
整数部10桁の表示。小数部は切捨てか四捨五入。

>printf("X%8.5f\n",$b);　の実行結果は左に一桁ずれていますなぜですか。
Xとゼロの間に空白がありますが、±記号が入ります。
プラスの数字の場合は記号が表示されないだけです。マイナスの数値を表示させればハッキリとわかります。

printf("%05d\n", 43);
とすれば、５桁になるように左側をゼロで埋めてくれます。

Ｃ言語のprintfとほぼ同じなので、Ｃ言語も合わせて勉強する事をお勧めします。