Laporan Akhir Praktikum

Listing program pascal procedure dan function
Listing prosedure
uses crt;
var
   l,p,tambah,kali,kurang:integer;
procedure perhitungan;
begin
   writeln('***** PROGRAM PERHITUNGAN *****');
   writeln;
   write('masukkan nilai 1 :');readln(l);
   write('masukkan nilai 2 :');readln(p);
   writeln;
   kali :=4*p;
   tambah :=8+p;
   kurang :=1-p;
   end;
begin
clrscr;
perhitungan;
writeln('hasil ',4,' * ',p,' = ',kali);
writeln('hasil ',8,' + ',p,' = ',tambah);
writeln('hasil ',1,' - ',p,' = ',kurang);
readln;
end.


Logikanya
Uses crt untuk menampilkan monitor. Varl::integer; nama,menu; untuk menentukan variable yang dipakai yaitu integer. Prosedur adalah fungsi yang tidak mengembalikan nilai, maka dari itu penggunaan prosedur selalu menggunakan void karena void tidaklah mengembalikan nilai.
Tujuan dari penggunaan prosedur salah satunya adalah untuk mendefinisikan  masing – masing tugas.

Bentuk umum dari prosedur adalah:                     

void nama_prosedur (penamaan prosedur tidak diperkenankan memakai spasi)
Begin untuk mengawali program. Clrscr untuk membersihkan layar,repeat untuk pengulan. Cetak program menu, pihan, pada begin tersebut terdapat writeln(‘ ‘); yang di dalamnya dituliskan inputan yang nantinya akan ditampilkan setelah diRUN. Di situ terdapat juga readln( ); yang berfungsi untuk membaca inputan. Kemudian end; dan .if((hasil=’kali')or(hasil=’tambah')or(hasil=’kurang')) Kemudian selanjutnya program diakhiri dengan readln; untuk menampilkan hasil program dan end. untuk mengakhiri program.
 Listing program pascal procedure
 


output
 

Ø Listing program pascal

program fungsi_1;
uses crt;
function luas (A,B:integer):INTEGER;
begin
   LUAS:=A*B;
   end;
var
x,y:integer;
begin
clrscr;
   writeln('program menghitung luas persegi');
   writeln;
   write('masukkan sisi =');readln(x);
   write('masukkan sisi =');readln(y);
   writeln;
   writeln('luas persegi adalah = ',luas(x,y));
   readln;
end.

Ø Logikanya

Uses crt untuk menampilkan monitor. Function adalah sebagian blok kode yang ditulis sebelum atau sesudah fungsi main ( ). Functions adalah cara untuk mengorganisir program ke dalam beberapa bagian blok yang memiliki tugas sendiri – sendiri. Jadi sebenarnya function dan prosedur hampir sama hanya saja function mengembalikan nilai.
Bentuk umum dari function adalah:
Tipe data nama_fungsi (parameter)
Penamaan nama fungsi dalam function juga tidak diperkenankan adanya spasi. Varl::integer; nama,menu; untuk menentukan variable yang dipakai yaitu integer.Begin untuk mengawali program. Clrscr untuk membersihkan layar,repeat untuk pengulan. Cetak program menu, pihan, pada begin tersebut terdapat writeln(‘ ‘); yang di dalamnya dituliskan inputan yang nantinya akan ditampilkan setelah diRUN. Di situ terdapat juga readln( ); yang berfungsi untuk membaca inputan. Kemudian selanjutnya program diakhiri dengan readln; untuk menampilkan hasil program dan end. untuk mengakhiri program.

            Listing program pascal function

 



Output
 



Listing program c++ procedure dan function
procedur
include<iostream.h>

void volume_limas()
{
double p, l, t;
cout<<"Volume limas segi empat"<<endl;
cout<<"Masukkan panjang: ";
cin>>p;
cout<<"Masukkan lebar: ";
cin>>l;
cout<<"Masukkan tinggi: ";
cin>>t;
cout<<"Volume limas segi empat: "<<p*l*t/3<<endl;
}

void volume_kerucut()
{
double r, t;
cout<<"Volume kerucut"<<endl;
cout<<"Masukkan jari2: ";
cin>>r;
cout<<"Masukkan t: ";
cin>>t;
cout<<"Volume kerucut: "<<3.14*r*r*t/3<<endl;
}

void volume_bola()
{
double r;
cout<<"Volume bola"<<endl;
cout<<"Masukkan nilai r= ";
cin>>r;
cout<<"Volume bola= "<<4*3.14*r*r*r/3<<endl;
}

int main()
{
volume_limas();
volume_kerucut();
volume_bola();

return 0;
}





Logika
#include<iostream.h >
void volume_limas   Bentuk umum dari prosedur, void dan diikuti nama prosedurnya (V_limas) .Menggunakan tipe data double untuk hasil penghitungan angka desima.
 Pemanggilan prosedur sesuai dengan nama prosedurnya . cout<<”  “; digunakan untuk tempat mengisi tampilan yang nantinya ada setelah di RUN. Adapun kode yang mengikuti seperti cin>>pilih; berfungsi untuk menginput data berupa numerik, string, dan karakter.end untuk mengakhiri’


listing program c++
 


output 










Listing program c++function
#include <iostream.h>

              

double vlimas(double, double, double);
double vkerucut(double, double);
double vbola(double);

double vlimas(double p, double l, double t){
return((p*l*t)/5);

}

double vkerucut(double r, double t){
return((3.14*r*r*t)/5);
}

double vbola(double r){
return((4*3.14*r*r*r)/5);
}

int main(){

double x,y,z,a,b,c;
cout<<"Mencari volume limas\n";
cout<<"Masukkan panjang, lebar dan tinggi: ";
cin>>x>>y>>z;
cout<<"Volume bola = "<<vlimas(x,y,z)<<endl;
cout<<"\nMencari volume kerucut\n";
cout<<"Masukkan jari2 dan tinggi: ";
cin>>a>>b;
cout<<"Volume kerucut = "<<vkerucut(a,b)<<endl;
cout<<"\nMencari volume bola\n";
cout<<"Masukkan jari2: ";
cin>>c;
cout<<"Volume bola = "<<vbola(c)<<endl;

return 0;

}

Logikanya

#include<iostream.h >
void volume_limas   Bentuk umum dari prosedur, void dan diikuti nama prosedurnya (V_limas) .Menggunakan tipe data double untuk hasil penghitungan angka desima.
 Pemanggilan prosedur sesuai dengan nama prosedurnya . cout<<”  “; digunakan untuk tempat mengisi tampilan yang nantinya ada setelah di RUN. Adapun kode yang mengikuti seperti cin>>pilih; berfungsi untuk menginput data berupa numerik, string, dan karakter’end untuk , mengakhiri program.

Ø Liting program c++ function

 

output