menentukan bulan dalam pascal

Annyeong chingu .. sebelumnya perkenalkan saya seli, disini saya ingin berbagi pada teman2 bagaimana cara membuat program menentukan bulan pada pascal. ya udah deh kita langsung aja yukkkk bikin programnya program bulan; uses crt; var        n : integer; BEGIN         clrscr;         write('masukan angka : ');readln(n);         write('bulan ke ',n,' adalah bulan : ' );         case angka of                 1 :begin                         writeln('januari');                         readln;                    end;                2:begin                         wri...