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
[email protected]

Kata Kunci

contoh pemrograman pascal, ckntoh tanggal dan bulan di lascal, contoh program nama free pascal, program pascal menghitung hari menggunakan array, pascal array nama bulan, nama hari dejgan array pascal, algoritma array turbo pascal, contoh array kode bulan, contoh array bulan, program turbo pascal meminta data bulan dan menentukan jumlah hari di setiap bulan nya.

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.