Translate to your languages

Selamat Datang . Suatu kehormatan bagi saya atas kunjungan ini. Saya sangat berharap kunjungan berikutnya.

24 Juni 2008

Prosedur dengan parameter masukan/keluaran

1. Prosedur dengan parameter masukan/keluaran

ALGORITMIK

Prosedur :

Procedure TUKAR (input/output X, Y : integer)

/* Mempertukarkan nilai X dan Y */

/* K.Awal : Nilai X dan Y sudah terdefinisi */

/* K.Akhir : X berisi nilai Y yang lama, Y berisi nilai X yang lama*/

DEKLARASI

Temp : integer /* peubah Bantu */

DESKRIPSI

Temp <- x /* Simpan nilai X ke dalam temp */

X <- y /* isikan nilai Y ke dalam x */

Y <- temp /* isikan nilai temp ke dalam y */

Program Utama :

Algoritma TUKAR_A_B

/* Program utama untuk menukarkan nilai a dan B. Nilai A dan B dibaca dari piranti masukkan. */

DEKLARASI

A, B : integer

Procedure TUKAR (input/output X, Y : integer)

/* Mempertukarkan nilai X dan Y.*/

DESKRIPSI

Read (A,B)

Write(A,B) /* cetak nilai A dan B sebelum pertukaran */

TUKAR(A,B) /* cetak nilai A dan B dengan memanggil prosedur TUKAR*/

Write(A, B) /* cetak nilai A dan B setelah pertukaran */

Bahasa C

/* PROGRAM TUKAR_AB */

/* Program utama untuk mempertukarkan nilai A dan B. Nilai A dan B dibaca dari piranti masukan */

#include

void TUKAR (int *x, int *y)

{ Mempertukarkan nilai X dan Y }

main( )

{

/* DEKLARASI */

int A, B;

/* DESKRIPSI : PROGRAM UTAMA * /

printf(“A : ?”); scanf(“%d”,&A);

printf(“B : ?”); scanf(“%d”,&B);

/* Cetak nilai A dan B sebelum pertukaran * /

printf(“A= %d \n”,A);

printf(“B= %d \n”,B);

{ pertukarkan nilai A dan B dengan memanggil prosedur TUKAR }

TUKAR(&A,&B);

/* Cetak nilai A dan B sebelum pertukaran * /

printf(“A= %d \n”,A);

printf(“B= %d \n”,B);

}

void TUKAR (int *X, int *Y)

/* Mempertukarkan nilai X dan Y */

/* K. Awal : Harga X dan Y sudah terdefinisi. */

/* K. Akhir : X berisi harga Y, dan Y berisi harga Y semula. */

{

/* DEKLARASI */

int temp; /* peubah Bantu */

/* DESKRIPSI */

temp=*X; /* simpan harga X di dalam temp */

*X=*Y; /* isi X dengan harga Y */

*Y=temp; /* isi Y dengan harga temp */

}

Tidak ada komentar: