Home » » Cara Membuat Program Algoritma Hari Berdasar Contoh

Cara Membuat Program Algoritma Hari Berdasar Contoh

Posted by DEC Development Education and Culture on Friday, 7 December 2012

program Program_asosiasi_hari;
 
uses
  WinCrt;
var
harike:integer;


begin
clrscr;
writeln('Hari Ke....=');
readln (harike);
case harike of
1 : writeln('Minggu');
2 : writeln('Senin');
3 : writeln('Selasa');
4 : writeln('Rabu');
5 : writeln('Kamis');
6 : writeln('Jumat');
7 : writeln('Sabtu');
end;
END.


0 comments:

Post a Comment

RECENT POST

Popular Posts

Powered by Blogger.
.comment-content a {display: none;}