無差別に技術をついばむ鳥

情報処理技術全般を気まぐれにつつくゆるいブログです

COBOLをつつく2−算術計算から分かるコボル0♪コンパイル方法ピヨ♪

2008-10-27 Mon 20:52
コボルは他の言語とは違って、一度に複数の事を覚えないといけないから囀るのが難しいんだ。うーんどうしよう・・・そうだ！とにかく餌（プログラム）をお見せすることにするピヨ♪


IDENTIFICATION DIVISION.
PROGRAM-ID. COMPUTESAMPLE.
DATA DIVISION.
WORKING-STORAGE SECTION.
   01 X PIC 9(3).
   01 Y PIC 9(3).
   01 KEI PIC 9(4).
PROCEDURE DIVISION.
   MOVE 10 TO X, Y
   COMPUTE KEI = X + Y
   DISPLAY X " + " Y " = " KEI.
   COMPUTE KEI = X - Y
   DISPLAY X " - " Y " = " KEI.
   COMPUTE KEI = X * Y
   DISPLAY X " * " Y " = " KEI.
   COMPUTE KEI = X / Y
   DISPLAY X " / " Y " = " KEI.
   STOP RUN.
END PROGRAM COMPUTESAMPLE.


この基本的な餌を何度もつつきながら囀るピヨッ♪先ずはコンパイル方法をつついてみよう。動かないと面白くないからね♪


cobc -x compute.cob

このコマンドをコマンドプロンプトから実行しよう♪おっと、言い忘れていた。コンパイル前にCDコマンドでサンプルファイルのディレクトリへ移動しておいてね♪
CDコマンドのやり方は・・・


cd /d ディレクトリ名

例えば、CドライブにあるCOBOLディレクトリに移動する場合はこうするピヨ♪


cd /d C:\COBOL\

これでOK！無事コンパイル出来たら何も言ってこないから、次は実行してみよう♪


compute.exe

そうしたら・・・


010　+　010　=　0020
010　-　010　=  0000
010　*　010　=　0100
010　/　010　=　0001


とコマンドプロンプトに表示されるピヨッ♪桁がそろっていて綺麗だね♪
次回からはこのプログラムを元にCOBOLの要素をつついていくピヨ♪お楽しみに♪
FC2ブックマークに追加
別窓 | COBOL | コメント:0 | トラックバック:0 | ∧top | under∨
<<中の人の徒然草106 | 無差別に技術をついばむ鳥 | 書籍をつつく４3−インサイドWindows第４版。本物の力を身に付けよう♪>>

この記事のコメント

∧top | under∨

コメントの投稿
　

管理者だけに閲覧
　

この記事のトラックバック

トラックバックURL

FC2ブログユーザー専用トラックバックURLはこちら
∧top | under∨
| 無差別に技術をついばむ鳥 |