tawasuyu

tawasuyu/brahman

Rust 492TOML 194Markdown 53JSON 176939 Sutichaykuna

⎇ 4d9ce11b1e444430e6e2bcc0a72baa1d40a4527c crates/modules/charka/corpus/03-condicional.cob 17 siq'ikuna · 372 B Ñawpa willay ch'uya

feat(charka): charka-shadow — validador en sombra + corpus COBOL 4d9ce11b1 · sergio · 

1* corpus charka — nivel 3: condicionales IF / ELSE
2IDENTIFICATION DIVISION.
3PROGRAM-ID. CONDICIONAL.
4DATA DIVISION.
5WORKING-STORAGE SECTION.
601 WS-NOTA PIC 9(3) VALUE 72.
7PROCEDURE DIVISION.
8MAIN.
9    IF WS-NOTA >= 60
10        DISPLAY 'APROBADO'
11    ELSE
12        DISPLAY 'REPROBADO'
13    END-IF.
14    IF WS-NOTA > 90
15        DISPLAY 'CON HONORES'
16    END-IF.
17    STOP RUN.