Simple
Sand
Samples
プログラミング言語サンプル集
TOPへ
Hello World!(各言語のTOP)
コメント
(分岐)if文を使う
(分岐)if~elseを使う
(繰り返し)for文を使う
(計算)四則演算
(計算)商と余りを求める
(計算)小数点以下切り捨て
(計算)平方根
(計算)対数
(文字列)小文字->大文字 変換
(文字列)大文字->小文字 変換
(文字列)文字列を左右反転
乱数を使う

説明のないとってもシンプルなサンプルプログラム集
COBOL awk C言語 D言語 GO言語 Lua Vim
bash Perl Gauche Clojure CLISP EmacsLisp VimScript
tcsh Ruby Groovy Java C# VBScript JavaScript
Io言語 Python Erlang Scala VB.NET Excel/VBA PHP
Tcl Haskell OCaml PowerShell Windows Unix/Linux

COBOL > else文を使う

    else.cob

1
2
3
4
5
6
7
8
9
10
11
12
13
       IDENTIFICATION DIVISION.
       PROGRAM-ID. HELLO.
       DATA DIVISION.
       WORKING-STORAGE SECTION.
       77 NUM PIC 9(3).
       PROCEDURE DIVISION.
       MOVE 2 TO NUM.
       IF NUM = 1 THEN
       DISPLAY "THIS IS 1" UPON CONSOLE
       ELSE
       DISPLAY "ELSE"
       END-IF.
       STOP RUN.
$ cp else.cob hoge.cob //使用できないファイル名のため
$ cobc -x hoge.cob
$ ./hoge
ELSE
$