明解Ｃ言語 入門編 > 5. 配列 > 配列の各要素に先頭から順に １，２，３，４，５ を代入して表示 Perl $score[0] = 1; $score[1] = 2; $score[2] = 3; $score[3] = 4; $score[4] = 5; print "点数1 = $score[0]\n"; print "点数2 = $score[1]\n"; print "点…

明解Ｃ言語 入門編 > 5. 配列 > ５人の点数を読み込んで合計点と平均点を表示 Perl print "点数を入力してください。\n"; print "１番："; chomp($score1 = <>); print "２番："; chomp($score2 = <>); print "３番："; chomp($score3 = <>); print "４番："…

明解Ｃ言語 入門編 > 4. プログラムの流れの繰り返し > 読み込んだ整数値までカウントアップ、０までカウントダウン (for文) Perl print "正の整数を入力してください："; chomp($no = <>); for ($i = 0; $i <= $no; $i++) { print "$i\n"; } print "正の整…

明解Ｃ言語 入門編 > 4. プログラムの流れの繰り返し > 読み込んだ整数値を０までカウントダウン (while文) Perl print "正の整数を入力してください："; chomp($no = <>); while ($no >= 0) { printf("%d\n", $no--); } print "正の整数を入力してください…

明解Ｃ言語 入門編 > 4. プログラムの流れの繰り返し > １から５までの和を求めて表示 (初期化子) Perl

明解Ｃ言語 入門編 > 4. プログラムの流れの繰り返し > 読み込んだ整数値を逆順に表示 (do文) Perl do { print "正の整数を入力してください："; chomp($no = <STDIN>); print "\a負の数を入力しないでください。\n" if ($no < 0); } while ($no < 0); print "その</stdin>…

明解Ｃ言語 入門編 > 4. プログラムの流れの繰り返し > 読み込んだ整数値は奇数か偶数か (do文) Perl do { print "整数を入力してください："; chomp($no = <STDIN>); if (int($no % 2)) { print "その数は奇数です。"; } else { print "その数は偶数です。"; } pri</stdin>…

明解Ｃ言語 入門編 > 3. プログラムの流れと分岐 > 読み込んだ月の季節を表示 (switch文) Perl

明解Ｃ言語 入門編 > 3. プログラムの流れと分岐 > 読み込んだ月の季節を表示 (論理演算子) Perl print "何月ですか："; chomp($month = <STDIN>); if (3 <= $month && $month <= 5) { printf "春です。\n"; } elsif (6 <= $month && $month <= 8) { printf "夏です</stdin>…

明解Ｃ言語 入門編 > 3. プログラムの流れと分岐 > 読み込んだ２つの整数値の大きい方の値・小さい方の値を表示 (複合文) Perl print "２つ整数を入力してください。\n"; print "整数１："; chomp($n1 = <STDIN>); print "整数２："; chomp($n2 = <STDIN>); if ($n1 > $n2)</stdin></stdin>…

明解Ｃ言語 入門編 > 3. プログラムの流れと分岐 > 読み込んだ２つの整数値の大きい方の値を表示 (条件演算子) Perl print "２つ整数を入力してください。\n"; print "整数１："; chomp($n1 = <STDIN>); print "整数２："; chomp($n2 = <STDIN>); $max = ($n1 > $n2) ? $n1</stdin></stdin>…

明解Ｃ言語 入門編 > 3. プログラムの流れと分岐 > 読み込んだ整数値の符号を判定 (関係演算子) Perl print "整数を入力してください："; chomp($no = <STDIN>); if ($no == 0) { print "その数は 0 です。\n"; } elsif ($no > 0) { print "その数は 正 です。\n"; </stdin>…

明解Ｃ言語 入門編 > 3. プログラムの流れと分岐 > 読み込んだ２つの整数値は等しくないか (等価演算子) Perl print "２つ整数を入力してください。\n"; print "整数１："; chomp($x1 = <STDIN>); print "整数２："; chomp($x2 = <STDIN>); if ($x1 != $x2) { print "それ</stdin></stdin>…

明解Ｃ言語 入門編 > 3. プログラムの流れと分岐 > 読み込んだ２つの整数値は等しいか (等価演算子) Perl print "２つ整数を入力してください。\n"; print "整数１："; chomp($x1 = <STDIN>); print "整数２："; chomp($x2 = <STDIN>); if ($x1 == $x2) { print "それらの</stdin></stdin>…

明解Ｃ言語 入門編 > 3. プログラムの流れと分岐 > 読み込んだ整数値は５で割り切れないか (if文) Perl print "整数を入力してください："; chomp($vx = <STDIN>); if ($vx % 5) { print "その数は５で割り切れません。\n"; } else { print "その数は５で割り切れま</stdin>…

明解Ｃ言語 入門編 > 2. 演算と型 > 整数と浮動小数点数を書式化して表示 Perl printf("[%d]\n", 123); printf("[%.4d]\n", 123); printf("[%4d]\n", 123); printf("[%04d]\n", 123); printf("[%-4d]\n\n", 123); printf("[%d]\n", 12345); printf("[%.3d]\n…

明解Ｃ言語 入門編 > 2. 演算と型 > 読み込んだ３つの整数値の合計値と平均値を表示 (キャスト) Perl

明解Ｃ言語 入門編 > 2. 演算と型 > 読み込んだ２つの整数値の平均値を実数で表示 (キャスト) Perl print "２つの整数を入力してください。\n"; print "整数１："; chomp($vx = <STDIN>); print "整数２："; chomp($vy = <STDIN>); print "それらの平均は", int(($vx + $vy</stdin></stdin>…

明解Ｃ言語 入門編 > 2. 演算と型 > 型と演算について確認する Perl

明解Ｃ言語 入門編 > 2. 演算と型 > 読み込んだ２つの実数値の 和・差・積・商 を実数で表示 Perl print "２つの数を入力してください。\n"; print "実数１："; chomp($vx = <STDIN>); print "実数２："; chomp($vy = <STDIN>); print "vx + vy = ", $vx + $vy, "\n"; prin</stdin></stdin>…

明解Ｃ言語 入門編 > 2. 演算と型 > 整数と浮動小数点数 Perl $nx = 9.99; $dx = 9.99; print " int 型変数nxの値：", int($nx), "\n"; print " nx / 2：", int($nx / 2), "\n"; print "double型変数dxの値：", $dx, "\n"; print " dx/2.0：", $dx / 2, "\n"…

明解Ｃ言語 入門編 > 2. 演算と型 > 読み込んだ２つの整数値の平均値を表示 Perl print "２つの整数を入力してください。\n"; print "整数１："; chomp($vx = <STDIN>); print "整数２："; chomp($vy = <STDIN>); print "それらの平均は", int(($vx + $vy) / 2), "です。\n</stdin></stdin>…

明解Ｃ言語 入門編 > 2. 演算と型 > 読み込んだ整数値の符号を反転して表示 Perl print "整数を入力してください："; chomp($num = <STDIN>); print "符号を反転させた値は", -$num, "です。\n"; 実行結果 L:\>perl lesson_02_008.pl 整数を入力してください：75 符</stdin>…

明解Ｃ言語 入門編 > 2. 演算と型 > 読み込んだ２つの整数値の 商・剰余 を表示 Perl print "２つの整数を入力してください。\n"; print "整数１："; chomp($vx = <STDIN>); print "整数２："; chomp($vy = <STDIN>); print "ＡをＢで割ると", int($vx / $vy), "あまり", $</stdin></stdin>…

明解Ｃ言語 入門編 > 2. 演算と型 > 読み込んだ２つの整数値の 和・差・積・商・剰余 を表示 Perl print "２つの整数を入力してください。\n"; print "整数１："; chomp($vx = <STDIN>); print "整数２："; chomp($vy = <STDIN>); print "vx + vy = ", $vx + $vy, "\n"; pr</stdin></stdin>…

明解Ｃ言語 入門編 > 1. まずは慣れよう > 読み込んだ２つの整数値の和を表示 Perl print "２つの整数を入力してください。\n"; print "整数１："; chomp($n1 = <STDIN>); print "整数２："; chomp($n2 = <STDIN>); print "それらの和は", $n1 + $n2, "です。\n"; 実行結果</stdin></stdin>…

明解Ｃ言語 入門編 > 1. まずは慣れよう > 読み込んだ整数の１０倍の値を表示 Perl print "整数を入力してください："; chomp($no = <STDIN>); print "その数の１０倍は" , $no * 10, "です。\n"; 実行結果 L:\>perl lesson_01_004.pl 整数を入力してください：37 </stdin>…

明解Ｃ言語 入門編 > 1. まずは慣れよう > ２つの変数に整数値を格納して表示 Perl $vx = 57; $vy = $vx + 10; print "vxの値は$vxです。\n"; print "vyの値は$vyです。\n"; 実行結果 L:\>perl lesson_01_003.pl vxの値は57です。 vyの値は67です。

明解Ｃ言語 入門編 > 1. まずは慣れよう > 整数値 15 と 37 の和を親切に表示する Perl print "15と37の和は", 15 + 37, "です。\n"; 実行結果 L:\>perl lesson_01_002.pl 15と37の和は52です。

明解Ｃ言語 入門編 > 1. まずは慣れよう > 整数値 15 から 37 を引いた値を表示する Perl print 15 - 37; 実行結果 L:\>perl lesson_01_001.pl -22