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, skrip kalender free pascal, CONTOH SKRIP C DI TURBO PASCAL, contoh program java menentukan 4 musim dalam setahun dengan if else, contoh program if and else bulan, contoh coding menentukan nama-nama bulan pada turbo pascal, contoh coding menentukan nama bulan pada turbo pascal, case untuk menentukan musim java, cara menggunakan array tanggal pada bulan di depphi, cara buat program bulan free pascal.

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.