program array pascal dan c++

Program Array c++

   Pada program C++ ini, saya menggunakan perintah menu stdio.h

Sama halnya dengan program array pascal, fungsi pada C++ ouputnya juga berupa hasil bukan proses.

Untuk prosesnya sudah langsung dijalankan ketikadi Run.

Berbeda dengan program lain, kalau program lain kita melakukan prosesnya dulu seperti kita disuruh memasukan angka ini,angka itu atau bentuk huruf tapi kalau array, ketika di run program langsung menghasilkan ouput berupa hasil.

     Lihatlah listing program dibawah ini :

#include<conio.h>

#include<stdio.h>

  main()

  {

    float suhu[5];

   float total=0;

    clrscr();

   cout<<"Masukan Data Suhu "<<endl<<endl;

   for (int i=0;i<5;i++)

       {

          cout<<"Suhu Ke : "<<(i+1)<<" = ";

         cin>>suhu[i];

         total+=suhu[i];

      }

      cout<<endl;

      cout<<"Suhu rata-rata "<<total/5<<endl;

      getch();

      }

Logika Program

      #include<iostream.h> adalah Baris pertama tuliskan kode untuk menginstruksikan kepada kompiler untuk menyisipkan file lain (iostream.h) saat program dikompilasi. <conio.h>  adalah header file yang digunakan untuk membuat teks antar muka pengguna dari program yang akan dijalankan, int array untuk mendifinisikan bilangan bulat yang akan berjalan pada blok program tersebut sedangkan float array untuk mendifinisikan bilangan betipe pecahan yang akan berjalan pada bllok program tersebut. Void adalah tipe data yang digunakan untuk tipe suatu fungsi yang tidak mengembalikan nilai pada fungsi tersebut. Fungsi main adalah merupakan bagian yang paling pertama untuk dieksekusi, di atas merupakan program pertama yang akan berjalan, dari fungsi menu(); akan memanggil function int fungsi_menu() yang di dalamnya.

Output program

       Berikut tampilan program sebelum diRun :

Tampilan program setelah diRun :

Kemudian setelah itu sebagai contoh kita masukan angka , terus tekan enter maka akan muncul tampilan yang memintaa kita untuk memasukkan angka pertama dan angka kedua, sebagai contoh masukkan angka pertama dan -2 pada angka kedua, kemudian tekan enter maka akan muncul tampilan pada baris pertama adalah hasil kali angka pertama dengan angka kedua, sedangkan pada baris kedua adalah hasil pangkat dari angka pertama pangkat angka kedua. Untuk kembali pada menu utama tekan y terus enter seperti di bawah ini :

Program array pascal

     Program ini bernama program array, array adalah jenis program yang langsung menampilkan hasil berupa output ketika dijalankan atau di Run.

Berikut listing program array :

program array_warnet;
uses crt;
const max=50;
type
Twarnet = record
     NAMA : string [25] ;
     KOMPI : string [8] ;
     JAM : array [1..2] of real;
end;
Tkumpulanwarnet = array[1..max] of Twarnet;
var
A : Tkumpulanwarnet;
i,N: Integer;
NA: real;
durasi:real;
begin
clrscr;
writeln ('=====> PROGRAM DATA WARNET <=====');
writeln ('---------------------------------');
write ('Masukan Data yg ingin diisikan :');
readln(N);
writeln ;
writeln ('=+=+ MASUKAN DATA ANDA +=+=    ');
writeln ('---------------------------');
for i:= 1 to N do begin
writeln('Data Pengunjung ke-',i);
with A[i] do begin
write ('NAMA             :'); readln(NAMA);
write ('Komputer         : KE-'); readln(KOMPI);
write ('Mulai Jam        : '); readln(JAM[1]);
write ('Selesai Jam       : '); readln(JAM[2]);
end;
writeln;
end;
writeln('Menampilkan Data');
writeln('------------------------------------');
writeln('NAMA':5,'':2, 'KOMPI':2, '':2,'BAYAR');
writeln('------------------------------------');
for i:=1 to N do begin
with A[i] do begin
NA:= (JAM[1]*JAM[2])/2 ;
write(NAMA:5, '':2, KOMPI:2, '' :3, NA:0:3);
end;
writeln;
end;
readln;
end.

Logika Program

         Uses crt digunakan untuk mengaktifkan monitor agar dapat dijalankan untuk mengerjakan program pascal. array besar (I,N:integer;) merupakan blok program array yang terdapat didalamnya, begin digunakan untuk memulai program tersebut. Kemudian var a,b: integer; merupakan awal dari program utamanya dimana var merupakan idenfier dari a dan b sebagai integer. Write berfungsi untuk menuliskan seatu variabel ke dalam sebuah komponen file, sedangkan readln bertugas mengeksekusi prosedure read kemudian bergerak ke baris berikutnya dalam file program. Adapun writeln berffungsi mengeksekusi prosedura write lalu kemudan mengeluarkan seebuah penanda end-of-line(EOL) ke file program. Kemudian semua program akan diakhiri dengan end.

Output program

Tampilan program sebelum diRun :

    Kemudian tampilan setelah diRun :

Sebagai contoh untuk program data yang diisi 1 angka. Pada data pengunjung masukan nama ucid dan pada angka pertama masukkan ke-1, dan seterusnya setelah itu tekan enter maka akan muncul tampilan yang menyatakan data pengunjung warnet yang sedang menjalankan seperti gambar di bawah ini :