Friday, 23 December 2016

Tipe Data dan Integer dalam Bahasa Java

Tipe Data
Tipe Data diperlukan agar compiler tahu operasi apa yang valid dan berapa banyak memori yang diperlukan oleh sebuah nilai yang akan disimpan atau dioperasikan.
Dalam Java ada 2 jenis: tipe data primitif dan tipe data referensi.
Tipe data primitif:
Integer : tipe data bilangan bulat, terdiri dari byte, short, int dan long. tipe data ini adalah yang paling sering 
             dipakai baik oleh pemula ataupun yang sudah berpengalaman
Floating-Point : tipe data pecahan, terdiri dari float dan double. cukup jarang dipakai oleh pemula 
                        programmer bahasa Java
Karakter : simbol dari sebuah karakter terdiri dari char.
Boolean : true or false, terdiri dari boolean.

Integer





 



 

Friday, 16 December 2016

Identifier, Keyword, dan Variabel dalam Java

Identifier
Merupakan nama yang digunakan untuk menamai class, variabel, method dan interface. Aturan:
- Tidak ada batasan panjang.
- Harus diawali dengan huruf, underscore, atau lambang dolar ($).
- Bukan merupakan keywords yang dikenal oleh Java.
Contoh identifier yang valid:
strTemp, $good, b4Th33, _aValidOne
Contoh identifier yang tidak valid:
4Ever, from-to, Good/Bad, *by5


Keyword
Merupakan kata-kata yang dikenal oleh compiler Java dan mempunyai arti khusus dalam program
contoh keyword: case, import, class,
                            for, false, default,
                            else, do, if, boolean, private, null


Variabel
Merupakan lokasi penyimpanan informasi yang ada di memori sesuai dengan tipe data yang dideklarasikan.
Aturan:
tipe-data nama-variabel
Tipe data meliputi semua tipe data dalam Java, nama variabel adalah identifier yang akan digunakan untuk merujuk variable tersebut dalam program.
contoh:
int counter;
Anda tidak dapat menggunakan variabel yang belum dideklarasikan:
counter = 0;
int counter;

Tuesday, 13 December 2016

Pengenalan Bahasa Java

Bahasa Java diciptakan oleh James Gosling, dan resmi diperkenalkan pada tahun 1995
Bahasa Java Merupakan bahasa pemrograman berorientasi obyek murni, dan Pada awalnya hanya mampu berjalan di SO Solaris & Windows NT. Pada tahun 1996 diciptakan Java versi 1.0 à Solaris, Windows NT/95, Macintosh

Karakteristik Bahasa Java
Mirip C/C++
- OOP (Object Oriented Programming)
- Multiplatform
- Distributed
- Portable
- Secure

Edisi Java
- J2SE (Java 2 Platform Standard Edition) à
mengembangkan aplikasi-aplikasi desktop dan server berukuran kecil hingga sedang.
J2EE (Java 2 Platform Enterprise Edition) à
untuk mengembangkan aplikasi-aplikasi berskala besar (enterprise).
- J2ME (Java 2 Platform Micro Edition) à
untuk mengembangkan aplikasi mobile, PDA dsb.

Struktur Program Java

Class à konstruksi Java yang paling penting.
Method à sekumpulan statement untuk melakukan operasi tertentu.

Reserved Word















Friday, 9 December 2016

Searching dalam Bahasa C

selamat malam, hari ini saya akan membagikan cara membuat program Searching dalam bahasa C
selamat mencoba


#include<stdio.h>
#include<conio.h>
#include<stdlib.h>

main()
{
int array[100], search, c, number;
printf("Input jumlah data : ");
scanf("%d",&number);
printf("Masukkan %d nomor : \n", number);
for(c=0; c<number; c++){
printf("Data ke-%d : ",c+1);
scanf("%d",&array[c]);
}
printf("Input data yang akan dicari : ");
scanf("%d",&search);
for (c=0; c<number; c++){
if (array[c]==search){
printf("\n%d ada di lokasi ke-%d.\n", search, c+1);
break;
}
}
if(c==number) printf("%d tidak ada di array\n", search);
getch();
_exit(0);
}

Thursday, 1 December 2016

Ascending dalam Bahasa C

Disini saya akan membagikan contoh program ascending dengan inputan user dalam Bahasa C
Semoga bermanfaat

#include <stdio.h>
#include <windows.h>
#include <conio.h>


int a[10], i=0, j=0, n, t;

main() {
    Sorting:
    system("cls");
printf ("Inputkan Banyak Data yang akan diurutkan : ");
scanf ("%d", &n);
printf ("\n");

for (i = 0; i <n; i++)
{
printf ("\n Masukkan Data ke %d : ", (i+1));
scanf ("%d", &a[i]);
}

for (j=0 ; j<(n-1) ; j++)
{
for (i=0 ; i<(n-1) ; i++)
{
if (a[i+1] < a[i])
{
t = a[i];
a[i] = a[i + 1];
a[i + 1] = t;
}
}
}

printf ("\n Setelah Pengurutan: ");
for (i=0 ; i<n ; i++)
{
printf (" \nindeks ke %d: %d",i+1, a[i]);
}
printf("\nKembali ke awal ? (y/n)");
i=getch();
if (i=='y')
goto Sorting;
else _exit(0);
}

Sorting Exchange dalam Bahasa C

Selamat malam, saya akan membagikan contoh coding Exchange Sort dalam bahasa C
Silahkan dilihat

#include<stdio.h>
const int ASC = 0;
const int DESC = 1;
int i, j;

void cetakData(int data[], int bykData){
printf("HASIL:\n");
for(i=0;i<bykData;i++){
printf("%d ",data[i]);
}
printf("\n\n");
}
void tukarData(int &angka1, int &angka2){
int temp = angka1;
angka1 = angka2;
angka2 = temp;
}

void exchangeSort(int data[], int bykData, int tipeUrutan){
printf("EXCHANGE SORT - ");
if(tipeUrutan==ASC){
printf("ASC\n");
}else if(tipeUrutan==DESC){
printf("DESC\n");
}
for(i=0; i<=bykData-2; i++){
for(j=0; j<bykData; j++){
printf("%d ",data[j]);
}
for(j=i+1; j<=bykData-1; j++){
if(tipeUrutan == ASC){
if(data[i]>data[j]){
tukarData(data[i],data[j]);
}
}else if(tipeUrutan == DESC){
if(data[i]<data[j]){
tukarData(data[i],data[j]);
}
}
}
printf("\n");
}
cetakData(data, bykData);
}

main(){
int data[10] = {5,2,1,4,7,9,3,5,8,6};
exchangeSort(data, 10, ASC);
exchangeSort(data, 10, DESC);
}

Sorting Selection dalam Bahasa C

Selamat Malam, hari ini saya akan membagikan contoh program sorting Selection dalam bahasa C, silahkan dipelajari

#include<stdio.h>
const int ASC = 0;
const int DESC = 1;
int i, j;

void cetakData(int data[], int bykData){
printf("HASIL:\n");
for(i=0;i<bykData;i++){
printf("%d ",data[i]);
}
printf("\n\n");
}
void tukarData(int &angka1, int &angka2){
int temp = angka1;
angka1 = angka2;
angka2 = temp;
}

void selectionSort(int data[], int bykData, int tipeUrutan){
printf("SELECTION SORT - ");
if(tipeUrutan==ASC){
printf("ASC\n");
}else if(tipeUrutan==DESC){
printf("DESC\n");
}
int minIndex;
for(i=0;i<bykData-1;i++){
for(j=0; j<bykData; j++){
printf("%d ",data[j]);
}
minIndex = i;
for(j=i+1;j<bykData;j++){
if(tipeUrutan==ASC){
if(data[j]<data[minIndex]){
minIndex=j;
}
}
else if(tipeUrutan==DESC){
if (data[j]>data[minIndex]){
minIndex=j;
}
}
}
if (minIndex!=i){
tukarData(data[i],data[minIndex]);
}
printf("\n");
}
cetakData(data, bykData);
}

main(){
int data[10] = {5,2,1,4,7,9,3,5,8,6};
selectionSort(data, 10, ASC);
selectionSort(data, 10, DESC);
}

Thursday, 17 November 2016

Insertion dalam bahasa C

hari ini saya akan membagikan program insertion dalam bahasa C
silahkan dipelajari

#include<stdio.h>
const int ASC = 0;
const int DESC = 1;
int i, j;

void cetakData(int data[], int bykData){
printf("HASIL:\n");
for(i=0;i<bykData;i++){
printf("%d ",data[i]);
}
printf("\n\n");
}
void tukarData(int &angka1, int &angka2){
int temp = angka1;
angka1 = angka2;
angka2 = temp;
}

void insertionSort(int data[], int bykData, int tipeUrutan){
printf("INSERTION SORT - ");
if(tipeUrutan==ASC){
printf("ASC\n");
}else if(tipeUrutan==DESC){
printf("DESC\n");
}
int temp;
for(i=1;i<bykData;i++){
for(j=0; j<bykData; j++){
printf("%d ",data[j]);
}
temp = data[i];
j=i-1;
if(tipeUrutan == ASC){
while(data[j]>temp && j>=0){
data[j+1]=data[j];
j--;
}
}else if(tipeUrutan == DESC){
while(data[j]<temp && j>=0){
data[j+1]=data[j];
j--;
}
}
data[j+1] = temp;
printf("\n");
}
cetakData(data, bykData);
}

main(){
int data[10] = {5,2,1,4,7,9,3,5,8,6};
insertionSort(data, 10, ASC);
insertionSort(data, 10, DESC);
}

Tuesday, 15 November 2016

Sorting Bubblesort dalam bahasa C

hari ini saya akan membagikan sorting dalam bahasa C, sorting nya adalah Bubblesort

#include<stdio.h>
const int ASC = 0;
const int DESC = 1;
int i, j;

void cetakData(int data[], int bykData){
printf("HASIL:\n");
for(i=0;i<bykData;i++){
printf("%d ",data[i]);
}
printf("\n\n");
}
void tukarData(int &angka1, int &angka2){
int temp = angka1;
angka1 = angka2;
angka2 = temp;
}

void bubbleSort(int data[], int bykData, int tipeUrutan){
printf("BUBBLE SORT - ");
if(tipeUrutan==ASC){
printf("ASC\n");
}else if(tipeUrutan==DESC){
printf("DESC\n");
}
int cek;
do{
cek=0;
for(i=0; i<bykData; i++){
printf("%d ",data[i]);
}
for(i=bykData-1; i>=1; i--){
if(tipeUrutan == ASC){
if(data[i]<data[i-1]){
for(j=i; j>=1; j--){
if(data[j]<data[j-1]){
tukarData(data[j],data[j-1]);
cek++;
}else break;
}
}
}else if(tipeUrutan == DESC){
if(data[i]>data[i-1]){
for(j=i; j>=1; j--){
if(data[j]>data[j-1]){
tukarData(data[j],data[j-1]);
cek++;
}else break;
}
}
}
if(cek!=0)break;
}
printf("\n");
}while(cek!=0);
cetakData(data, bykData);
}

main(){
int data[10] = {5,2,1,4,7,9,3,5,8,6};
bubbleSort(data, 10, ASC);
        bubbleSort(data, 10, DESC);
}

Monday, 14 November 2016

Menghitung luas segitiga dalam pascal

hari ini, saya akan membagikan cara mencari luas segitiga dalam pascal
silahkan dilihat

uses crt;
var a, t :integer;
begin
clrscr;
writeln('==SEGITIGA==');
write('Masukkan Alas : '); readln(a);
write('Masukkan Tinggi : '); readln(t);
writeln('Luas = ', a*t/2:0:2);
readkey;
end.


Sunday, 13 November 2016

Menghitung jari - jari, luas dan keliling lingkaran dalam pascal

selamat malam, hari ini saya akan membagikan cara mencari/menghitung jari - jari, luas dan diameter lingkaran jika diketahui diameternya dalam pascal

uses crt;
var d :integer;
begin
clrscr;
writeln('==LINGKARAN==');
write('Masukkan diameter : '); readln(d);
writeln('Jari-jari = ', d/2:0:2);
writeln('Luas = ',0.25*3.14*d*d:0:2);
writeln('Keliling = ', 3.14*d:0:2);
readkey;
end.

Friday, 11 November 2016

Konstanta dalam Pascal

Konstanta didefiniskan sebagai identifier yang dapat diassign oleh suatu nilai pada awal program. Nilai yang disimpan di dalam konstanta tidak dapat diubah.
pendeklarasian konstanta pada bagian const

contoh:

const
name = 'John Bruce'; //string
firstletter = 'a'; //char
year = 1996; //string
phi = 3.1415926535897932; //real

contoh program:

uses crt;
const
Nama = 'George';
Huruf = 'G';
Tahun = 1996;
phi = 3.1415926535897932;
begin
clrscr;
writeln('Nama: ', Nama);
writeln('Huruf: ', Huruf);
writeln('Tahun; ',Tahun);
writeln('phi: ', phi);
readkey();
end.

Thursday, 10 November 2016

Identifier dalam Pascal

Identifier merupakan sebuah nama yang digunakan untuk keperluan penyimpanan sebuah nilai, pendeklarasian variabel, konstanta, type dan nama program maupun subprogram

aturan penulisan identifier:
1. karakter pertama harus dimulai dengan karakter huruf a-z atau A-Z
2. setelah karakter pertama, dapat dilanjutkan dengan karakter alfanumerik (angka maupun huruf),         dan underscore
3. dalam penulisan identifier, tidak boleh menggunakan karakter berikut ini
    ~ ! @ # $ % ^ & * ( ) + ` - = { } [ ] : " ; ' < > ? , . / |
4. Tidak boleh menuliskan identifier dengan nama yang sesuai kata tercadang (reserved word) dalam PASCAL, seperti and, array, begin, case, const, div, do, downto, else, end, file, for, forward, function, goto, if, in, label, mod, nil, not, of, or, packed, procedure, program, record, repeat, set, then, to, type, until, var, while, with. Misal program_if, begin1, dll

contoh bentuk identifier:

identifier1 = value1;
identifier2 = value2;
identifier3 = value3;


Wednesday, 9 November 2016

Mari Belajar Coding 2

hari ini saya akan menjelaskan beberapa fungsi variabel dibawah ini

textcolor(color);

textcolor berfungsi memberi warna pada teks atau subjek di dalam write. dan color bisa kalian ganti,
misal red, blue, magenta, green, dll
contoh program

uses crt;
begin
clrscr;
textcolor(red);
write('Hello World');
readkey;
end.

berikutnya adalah

delay(input);

delay berfungsi untuk memberikan jeda pada subjek di dalam write, input bisa kalian masukkan angka terserah. jika kalian menginput 1, maka dia akan jeda selama 0,001 detik
jadi input 1000 = 1 detik
contoh program

uses crt;
begin
clrscr;
delay(1000);
write('H');
delay(1000);
write('e');
delay(1000);
write('l');
delay(1000);
write('l');
delay(1000);
write('o');
readkey;
end.

Tuesday, 8 November 2016

Mari Belajar Coding 1

disini saya akan menjelaskan struktur dari program pascal
Untuk membuat program di pascal selalu diawali
uses crt;
tapi terkadang bisa diawali 
program NamaProgram; setelah itu baruu uses crt;

contoh:

Program coba;
uses crt;
begin
statement 1;
.....
statement n;
readkey;
end.

biasa nya setelah uses crt; kita bisa menambahkan
clrscr;
fungsi nya untuk menghapus history dri program yang telah kita jalankan sebelumnya

contoh:

uses crt;
begin
clrscr;
write('Belajar Pascal');
readkey;
end.

silahkan di copy lalu di run, kemudian di close dan di run lagi. maka hasil program yang tadi akan terhapus, bandingkan dengan yang di bawah ini

uses crt;
begin
write('Belajar Pascal 2');
readkey;
end.

Sunday, 6 November 2016

Mari Mengenal Pascal

Bahasa Pascal ditemukan pada tahun 1970 oleh Nikolaus Wirth dan dirilis tahun 1971. Compiler bahasa Pascal ada banyak seperti dosBox, free Pascal dan lain - lain.
Di dalam Free Pascal ada menu utama seperti:
1. Menu File: berisi perintah untuk operasi yang berhubungan dengan file, seperti:
- New : membuat file program baru
- New From Template
- Open: membuka file program yang disimpan
- Reload
- Save: menyimpan program yang diupdate
- Save as: menyimpan program baru
- Save all
- Print
- Print setup
- Change dir....
- Command shell
- Exit

2. Menu Edit: lebih ke arah menyunting program, menyalin atau membuang teks dan melihat isi clipboard

3. Menu Search: Digunakan untuk mencari atau mengganti teks

4. Menu Run: untuk mengeksekusi program

5. Menu Compile: mengkompilasikan program ke disk atau ke memori

6. Menu Debug: melakukan debugging

7. Menu Tools: menampilkan jendela pesan kesalahan

8. Menu Options: untuk mengatur berbagai pilihan debugger dan linker

9. Menu Window: untuk menutup jendela, memperbesar ukuran jendela dan memilih jendela aktif

10. Menu Help: berisi bantuan bagi user free pascal

Pascal bersifat incasesensitive, yang berarti huruf besar dan kecil dianggap sama

Saturday, 5 November 2016

Function dalam Pascal

Definisi dan fungsi Function hampir sama dengan Procedure
tapi yang membdeakannya:
1. Function memiliki tipe data
2. Function memberikan nilai balik, sedangkan procedure tidak
3. Harus ada Nama Function di dalam tubuh Function

Struktur Function

Function Nama_Fungsi: tipe_hasil;
var
{bagian  deklarasi Function, sifatnya lokal}
begin
statement-1;
statement-2;
.......
statement-n;
Nama_Fungsi:=hasil;
end;

contoh program

function cetakbintang;
begin
cetakbintang:='******';
end;

begin
clrscr;
writeln(cetakbintang);
writeln(cetakbintang);
writeln(cetakbintang);
end.


Sunday, 30 October 2016

Procedure dalam Pascal

- Prosedur merupakan sub program yang tidak mengembalikan nilai secara langsung
- Semua deklarasi di dalam prosedur bersifat lokal sehingga hanya bisa digunakan oleh prosedur itu      saja, sedangkan deklarasi di dalam program utama bersifat global sehingga dapat dikenali di                seluruh program utama
- procedure selalu diakhiri dengan end;

contoh program procedure

uses crt;
var
a: real;

procedure Tanya_Hitung;
var
b: real;
begin
write('Nilai b = ');
readln(b);
a := b*b;
end;

begin
clrscr;
Tanya_Hitung;
writeln('Nilai a = ', a:0:0);
readkey();
end.

Sunday, 23 October 2016

Contoh Program Angka Kelipatan dalam Pascal

Saya akan membagikan program untuk membuat angka kelipatan dengan proteksi

Uses crt;

var
x,y,z,a,b:longint;

begin
    clrscr;
    writeln('MENU 1 - Perhitungan Angka');
    writeln('--------------------------');
    write('batas bawah : ');
    readln(a);
    write('batas atas  : ');
    readln(b);
    write('masukan angka : '); // angka yang akan jadi kelipatan
    readln(z) ;
    writeln();
    writeln('Hasil :');
    for x:=1 to 1000 do
        begin
             y :=z*x;
         if (y>=a) then
         if (y<=b) then
         begin
         writeln(y);
         end;
        end;
        readkey;
end.

Saturday, 22 October 2016

Sekuensial dalam Pascal

Apa itu Sekuens?? Sekuens adalah urut - urutan dalam menjalankan instruksi secara logika agar maksud yang dikandung dapat tercapai.
Sekuensial dalam Pascal ada 3 jenis instruksi:
1. P*  : digunakan untuk mencetak * dan membuat kursor maju selangkah
2. Pb  : digunakan untuk mencetak satu space kosong (spasi)
3. BB  : digunakan untuk return ke baris berikutnya (Enter)

Contoh program sekuens
Mencetak ***
Solusi
intruksi = P*;P*;P* 
dalam pascal = write('*'); write('*'); write('*');

program nya

uses crt;
begin
write('*'); write('*'); write('*');
readkey;
end.

contoh 2
membuat           ***
                          ***
                          ***

intruksi = BB; P*; P*; P*;
                 BB; P*; P*; P*;
                 BB; P*; P*; P*;

program nya

uses crt;
begin
write('*'); write('*'); write('*'); writeln();
write('*'); write('*'); write('*'); writeln();
write('*'); write('*'); write('*');
ens.

Friday, 21 October 2016

Cara Membuat Segitiga Sama Sisi Terbalik di Pascal

Halo selamat malam, hari ini saya akan membagikan cara membuat segitiga sama sisi tapi terbalik
silahkan dilihat dan dipelajari

uses crt;
var a, b, tinggi :integer;
begin
clrscr;
write('Masukkan Tinggi : '); readln(tinggi);
for a:= tinggi downto 1 do
begin
        for b:= tinggi downto a+1 do
        begin
        write(' ');
        end;
        for b:= 1 to (2*a)-1 do
        begin
        write('*');
        end;
        writeln();
        end;
readkey;
end.

Tuesday, 18 October 2016

Cara Membuat Belah Ketupat di Pascal

Haloo kawan - kawan, hari ini saya akan membagikan cara membuat belah ketupat di pascal
silahkan dilihat

uses crt;
var a, b, input :integer;
begin
clrscr;
for a:= 1 to 5 do
begin
for b:= 1 to 5-a do
begin
write(' ');
end;
for b:= 1 to 2*a-1 do
begin
write('*');

end;
writeln;
end;

for a:= 3 downto 0 do
begin
for b:= 3 downto a do
begin
write(' ');
end;
for b:= 1 to 2*a+1 do
begin
write('*');
end;
writeln();
end;
readkey
end.

Monday, 17 October 2016

Cara Mengecek Bilangan Prima di Pascal

Halo kawan - kawan, hari ini saya akan membagikan cara mengecek suatu bilangan prima atau tidak di Pascal, semoga bermanfaat ^^
ini source code nya

uses crt;
var a, b, p : integer;
ulang : char;
begin
clrscr;
p := 0;
write('Masukkan Bilangan : '); readln(b);
for a := 1 to b do
begin
 if b mod a = 0 then
   p := p+1;
end;
writeln();
if p = 2 then
    write(b,' Merupakan bilangan prima')
else
    write(b,' Bukan bilangan prima');
writeln();
readkey;
end.