RSS

Program Bilangan Ganjil dan Bilangan Genap

12:36:00 AM | Labels:

program ganjilgenap;
uses wincrt;
var b:integer;
begin
     write('Bilangan = ');readln(b);
     if (b mod 2)=1 then
     write(' Ganjil ')
     else
     write('Genap');
end.

OUTPUT :



 Gambar 1 Output untuk Input Bilangan Ganjil


Gambar 2 Output untuk Input Bilangan Genap

  • Digg
  • Del.icio.us
  • StumbleUpon
  • Reddit
  • RSS

0 comments:

Post a Comment

Subscribe to: Post Comments (Atom)