DIVIDE命令

COBOL
       WORKING-STORAGE SECTION.
       01 D       PIC 9(5) VALUE 10.
       PROCEDURE DIVISION.
           DIVIDE   D  BY  4.
           DISPLAY '10/4='  D ' .
           STOP RUN.

VB.NET
Module Module1
    Dim D As Integer = 10
    Sub Main()
       D /= 4
        Console.WriteLine("10/4=" & D )
    End Sub
End Module

お役に立てましたか？
ＩＴ、プログラミングのランキングサイトはこちらです。

最新記事の自動受信登録はこちらです。