Program Ganjil atau Genap dengan Bahasa Pascal
Secara garis besar, program ini bekerja melakukan pengecekan suatu bilangan yang diinput apakah merupakan bilangan ganjil atau genap. Bilangan Genap adalah adalah bilangan yang habis dibagi 2, sedangkan bilangan ganjil adalah sebaliknya, bilangan yang tidak habis apabila dibagi 2. Dibawah ini adalah source code program ganjil genap yang telah berhasil di compile. program ganjil_genap; uses crt; var bil:integer; begin clrscr; write( 'Input Bilangan : ' ); readln(bil); if (bil mod 2 = 0 ) then writeln(bil, ' adalah bilangan genap' ) else writeln(bil, ' adalah bilangan ganjil' ); readkey; end . Program diatas apabila kita run akan menampilkan output seperti dibawah ini : Read more >>>