Program Contoh Bulan

Apr 15, 2009 No Comments by Sahabat

Contoh program bulan di pascal kiriman Dianita Wahyu Kurniasih

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Program Contoh_Bulan;
 
uses wincrt;
 
const
Bulan :array[1..12] of string =
('Januari','Februari','Maret','April','Mei','Juni','Juli',
'Agustus','September','Oktober','November','Desember');
 
var
NoBulan:integer;
 
begin
  clrScr;
  write ('Masukkan nomor bulan: ' ); readln (NoBulan);
  write ('Nama bulan ke- ' ,NoBulan , ' adalah ',
  Bulan [NoBulan]);
  readln;
end.

Dianita Wahyu Kurniasih
Dhean_girl1@yahoo.com

Kata Kunci

contoh pemrograman pascal, program pascal bulan nama bulan, contoh program pascal bulan, program Pascal nama hari dan bulan, case of free pascal bulan nama nama bulan, Buatlah algoritma yang membaca angka bulan (integer) lalu menuliskan nama bulan sesuai angka bulannya Misalnya jika dibaca bulan 8 maka tercetak ‘Agustus’, Coding menghitung bulan pascal, contih program pascal simple tentang bulan, contoh algoritma menulis nama bulan, contoh free pascal nama bulan.

Pascal
Sahabat

Tentang Penulis

Penulis adalah sahabat-sahabat yg menyumbang tulisan di nusinau.com untuk dimuat dengan bijaksana. Silakan kirim tulisannya ke nusinau[at]gmail[dot]com atau ke admin[at]nusinau[dot]com. Butuh diskusi cepat? colek di twitter @nusinau
No Responses to “Program Contoh Bulan”

Leave a Reply

You must be logged in to post a comment.