COBOL言語IDENTIFICATION DIVISION. PROGRAM-ID. LEAPYEAR. DATA DIVISION. WORKING-STORAGE SECTION. 01 YEAR PIC 9(4). PROCEDURE DIVISION. DISPLAY "西暦年を入力してください: ". ACCEPT YEAR. IF YEAR MOD 4 = 0 AND (YEAR MOD 100 <> 0 OR YEAR MOD 4…
引用をストックしました
引用するにはまずログインしてください
引用をストックできませんでした。再度お試しください
限定公開記事のため引用できません。