Teknik Informatika: November 2012

Program Fungsi Turbo C++

#include <iostream.h>

#include <conio.h>

float luas_p(int l, int p)

{ return (l*p);}

float luas_l(int r)

{ return (3.14*(r*r)); }

float luas_t(int a,int t)

{ return ((0.5*a)*t);}

main()

{

int panjang,lebar,jari,alas,tinggi;

cout<<" PROGRAM MENGHITUNG LUAS BANGUN\n";

cout<<"_______________________________________\n";

cout<<"\n";

cout<<"MENGHITUNG LUAS PERSEGI PANJANG\n";

cout<<"---------------------------------------\n";

cout<<"Panjang = ";cin>>panjang;

cout<<"Lebar = ";cin>>lebar;

cout<<"\nLUAS = "<<luas_p(panjang,lebar);

cout<<"\n";

cout<<"MENGHITUNG LUAS LINGKARAN\n";

cout<<"---------------------------------\n";

cout<<"Jari-jari = ";cin>>jari;

cout<<"\nLUAS = "<<luas_l(jari);

cout<<"\n";

cout<<"MENGHITUNG LUAS SEGITIGA\n";

cout<<"---------------------------------\n";

cout<<"Alas = ";cin>>alas;

cout<<"Tinggi = ";cin>>tinggi;

cout<<"\nLUAS = "<<luas_t(alas,tinggi);

getch();

}

Logika Program

program fungsi ini dibuat untuk menghitung luas bangun, yaitu untuk menghitung luas perseg panjang, luas lingkaran dan luas segitiga. dalam pembuatan program menggunakan perintah

#include <iostream.h>

#include <conio.h>
untuk memanggil perintah-perintah selanjutnya.
dalam penghitungan luas dari bangun-bangun diatas, pertama denagan mengunakan perintah

float luas_p(int l, int p)

{ return (l*p);}

float luas_l(int r)

{ return (3.14*(r*r)); }

float luas_t(int a,int t)

{ return ((0.5*a)*t);}
untuk memasukkan rumus seperti skrip diatas..
menggunakan panjang,lebar,jari,alas,tinggi sebagai integer.
kemudian baru lakukan penginputan dan pengoutputan dengan menggunakan perintah "cout dan cin".
setelah itu program dijalankan.

Input dan Output Program

Program Fungsi Pascal

uses crt;

function kelilingsegitiga(a:integer; b:integer; c:integer) :real;

var keliling:real;

begin

clrscr;

keliling:=a+b+c;

kelilingsegitiga:= keliling;

end;

var a,b,c:integer;

keliling:real;

begin

writeln('PROGRAM FUNGSI KELILING SEGITIGA');

writeln('----------------------------------------------------');

write('Masukkan Nilai A : '); readln(a);

write('Masukkan Nilai B : '); readln(b);

write('Masukkan Nilai C : '); readln(c);

write(‘’);

write('Keliling Segitiga Adalah : ', kelilingsegitiga(a,b,c):0:0);

readln;

end.

Logika Program

program ini dibuat untuk menghitung keliling segitiga. pertama tentukan integer , yaitu a,b dan c sebagai integer. kemudian Var keliling dengan ketentuan harus bilangan real. mulai dengan memasukkan perinah clrscr; yatu untuk meclear program yang sebelumnya sudah pernah dijalankan.masukkan rumus untuk mencari keliling segitiga yaitu (a+b+c). kemudian akhiri dengan end;.
kemudian mulai lagi dengan menginput dan mengoutput program dengan menggunakan perintah "writeln dan readln". kemudian jalankan program.

Input dan Output Program

Prosedur Turbo C++

Program Prosedur Turbo C++

#include <iostream.h>

#include <conio.h>

void peminjaman (float a, float b, float c)

{

float hasil ;

hasil = a*b*c ;

cout << "==================================================" << endl;

cout << "HARGA PEMINJAMAN BUKU : Rp. " << hasil << endl ;

cout << "\n";

cout << "_____________THANK YOU VERY MUCH__________________" << endl;

}

void main()

{

float harga, jumlah, waktu ;

float hasil ;

cout << "PROGRAM PENGHITUNG PEMINJAMAN BUKU DIPERPUSTAKAAN" << endl ;

cout << "==================================================" << endl << endl ;

cout << "Masukkan Harga Peminjaman Perbuku : Rp. " ;

cin >> harga ;

cout << "Masukkan Jumlah Buku Yang Dipinjam : " ;

cin >> jumlah ;

cout << "Masukkan Waktu Lamanya Peminjaman Buku Dalam Hari : " ;

cin >> waktu ;

cout << "\n" ;

peminjaman(harga, jumlah, waktu) ;

getch();

}

Logika Program

Program ini dibuat untuk menghitung pembayaran dalam peminjaman buku diperpustakaan.
pertama dengan perintah

#include <iostream.h>

#include <conio.h>
untuk memanggil perintah-perintah selanjutnya.
menentukan void peminjaman dengan float a, float b, dan float c. dengan float hasil a*b*c.
agar program dapat berjalan masukkan inputan dan outputan sebagai berikut
Masukkan Harga Peminjaman Perbuku : Rp. ....
Masukkan Jumlah Buku Yang Dipinjam : .......
Masukkan Waktu Lamanya Peminjaman Buku Dalam Hari :......
maka akan menghasilkan perkaslian dari inputan tersebut setelah program djalankan.

Input dan Output Program

Prosedur pascal

PROGRAM PROSEDUR PASCAL

uses crt;

procedure hitung (a,b,c:byte);

begin

c:= a+(a*b);

clrscr;

writeln('PROGRAM PROSEDUR PENGHITUNGAN NILAI');

writeln('===================================');

writeln('Nilai A = ',a);

writeln('Nilai B = ',b);

writeln('Nilai C = ',c);

end;

var

p,q,r: byte;

begin

p:=5; q:=10; r:=15;

hitung(p,q,r);

writeln;

writeln('Nilai P = ',p);

writeln('Nilai Q = ',q);

writeln('Nilai R = ',r);

readln;

end.

Logika Program

Program ini dibuat untuk penghitungan nilai, dengan procedure hitung a,b, dan c.
dengan procedure hitung kedua yaitu p,q, dan r dengan p:=5; q:=10; r:=15;.
begin pertama yaitu menghitung ;

Nilai A =......

Nilai B =......

Nilai C =......, dengan C=A+(A*B)
begin kedua langsung dengan penentua tanpa penggunaan rumus yaitu p:=5; q:=10; r:=15;.
dengan skrip diatas kemudian jalankan program.