« DIVIDE命令 | トップページ | テキストファイル操作 »

2007年4月15日 (日)

剰余

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

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

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

にほんブログ村 IT技術ブログへ 人気blogランキングへ FC2 Blog Rankingへ


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

はてなRSSに追加

livedoor Readerに追加
My Yahoo!に追加
Googleに追加
goo RSSリーダーに追加

|

« DIVIDE命令 | トップページ | テキストファイル操作 »

コメント

コメントを書く



(ウェブ上には掲載しません)




« DIVIDE命令 | トップページ | テキストファイル操作 »