Setelah kita berkenalan dengan Pascal, sekarang saatnya kita bermain dengan Pemrograman Pascal. Pada Pemrograman Basic sudah disinggung tentang bagaimana membuat program untuk menampilkan Bilangan Ganjil dan Genap jadi seharusnya kita tidak akan kesulitan untuk membuat program yang sama dengan bahasa pascal.
Langsung saja, Masuk ke TP71 --> BIN --> Turbo.exe, setelah muncul worksheet ketikan code berikut:
uses crt;
var
a,i:integer;
begin
clrscr;
writeln ('Masukkan Batas Akhir Bilangan');readln(a);
for i:= 1 to a do
begin
if i mod 2 = 0 then writeln(i,' adalah Bilangan Genap')
else writeln (i,' adalah Bilangan Ganjil');
end;
readln;
end.
Setelah itu tekan alt + F9 untuk mengcompile dan ctrl + F9 untuk Running program
Semoga yang singkat ini bisa bermanfaat dan salam Kuliah Gratis
Langsung saja, Masuk ke TP71 --> BIN --> Turbo.exe, setelah muncul worksheet ketikan code berikut:
uses crt;
var
a,i:integer;
begin
clrscr;
writeln ('Masukkan Batas Akhir Bilangan');readln(a);
for i:= 1 to a do
begin
if i mod 2 = 0 then writeln(i,' adalah Bilangan Genap')
else writeln (i,' adalah Bilangan Ganjil');
end;
readln;
end.
Setelah itu tekan alt + F9 untuk mengcompile dan ctrl + F9 untuk Running program
Semoga yang singkat ini bisa bermanfaat dan salam Kuliah Gratis
Bila Ada Kesulitan atau ada pertanyaan terhadap Materi dari Kuliah Gratis silahkan Hubungi saya, Add ID YM saya radenmas_surya . Semoga dapat membantu Artikelnya Ya!
Postingan
22 komentar
waduh, udah lama study ini nih, pass saya SMA sekarang dah lupa, hehe...
kalau sekarang nih mulai fokus di PHP, mantap tenan...
Posted on 23 Juli 2009 pukul 18.16
salam kenalllll :)
Posted on 23 Juli 2009 pukul 18.40
masih belum diajarin itu..hehe
Posted on 23 Juli 2009 pukul 19.17
Aku g paham sama sekali..
Blm pernah baca,cuma pernah dgr..aku akn mncba mengikutinya..
Posted on 23 Juli 2009 pukul 21.20
wedew...ga maksut sama sekali mas sama bahasa pemograman nie..
btw makasih infonya ya
Posted on 23 Juli 2009 pukul 22.40
dah lamaaa banget nih ella ga nyobain pascal hehheheheh......
duuh nostalgia deh wakakkka
Posted on 23 Juli 2009 pukul 23.02
wa tutorial mantap untuk belajar pascal ;)
Posted on 23 Juli 2009 pukul 23.44
wah nggak ngerti sya om, salam kenal
Posted on 24 Juli 2009 pukul 00.07
mantap...sukses selalu..
Posted on 24 Juli 2009 pukul 01.29
pertamaxx. bingung gak bisa komen apa2 gak taw banyak neh sobat ;)
Posted on 24 Juli 2009 pukul 07.18
capek malam ini td siang ampe sore dari jalan prangtritis ;) met pagi sahabatku yg makin keren ini
Posted on 24 Juli 2009 pukul 07.20
@ Semuanya: Makasih dah mampir kesini, maaf tidak bisa membalas koment 1 per 1. Salam kuliah gratis dan sehat selalu
Posted on 24 Juli 2009 pukul 08.21
mantap boss kuliahnya hehe makasih banyak...
Posted on 24 Juli 2009 pukul 16.22
Wadoooooh bilangan apaan tuh mas..
Posted on 24 Juli 2009 pukul 22.25
wah, bener2 kuliah gratis. sayangnya dasar2 saya ttg program pascal ini tak hanya nol, mas, tapi bener2 minus, hehe ... makasih banget kuliah gratisnya.
Posted on 25 Juli 2009 pukul 02.13
@ Budy: sama2 Mas
@ Kang boed: Apa ya ???
@ sawali: Gak pa2 Pak disini dari dasar kok, sama pak ya
Posted on 25 Juli 2009 pukul 07.59
bikin otak kerja lagi heheh
Posted on 25 Juli 2009 pukul 13.24
Terimakasih Pak Berbagi ilmunya, Salam kenal
Posted on 10 Oktober 2009 pukul 16.23
top banget dech........bner2 berguna............semoga tetep terus dapat membantu orang2 yg lagi butuh informasi..........
Posted on 9 November 2009 pukul 09.24
Kalau menentukan banyaknya angka genap, gimana brada??
Posted on 12 Januari 2010 pukul 12.46
trimakasih untuk ilmunya :)
Posted on 6 November 2012 pukul 10.13
kode ada yang salah gan
Posted on 18 Maret 2013 pukul 19.25
Form Komentar
Tinggalkan Komentar sebagai Wujud Apreasiasi Anda!
Dilarang NYAMPAH disini!
Maafkan Jika Kuliah Gratis tidak membalas Komentar!