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, buatlah program untuk menentukan nama bulan berdasarkan nomor bulan yg dimasukkan dengan menggunakan if Then Else, flow chart nama bulan, contoh program array menampilkan bulan di pascal, contoh program algoritma if then else membuat bulan, contoh free pacsal android program nama bulan, buatlah program mencetak nama nama bulan berdasarkan nomor bulan, contoh flowchart nama bulan, Contoh program Array menentukan nama bulan, contoh flowchart mencari 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.