Senin, 13 Oktober 2014

Algoritma PERHITUNGAN_LAMA_PERJALANAN_2

Posted by  On 


Program PERHITUNGAN_LAMA_PERJALANAN_2
{Menghitung lama perjalanan melalui selisih antara waktu keberangkatan dan kedatangan}

DEKLARASI :
type waktu : record
            < jam        : integer
                menit    : integer
                detik      : integer >

jam_brkt     : waktu
jam_dtg       : waktu
sel_waktu   : waktu
pinjam          : waktu

ALGORITMA :
READ(jam_brkt.jam, jam_brkt.menit, jam_brkt.detik)
READ(jam_dtg.jam, jam_dtg.menit, jam_dtg.detik)

IF (jam_dtg.detik < jam_brkt.detik) THEN
            pinjam.menit = jam_dtg.menit – 1
            pinjam.detik = jam_dtg.detik + 60
            sel_waktu.detik = pinjam.detik - jam_brkt.detik
ELSE
            pinjam.menit = jam_dtg.menit
            sel_waktu.detik = jam_dtg.detik - jam_brkt.detik
END IF

IF  (pinjam.menit < jam_brkt.menit) THEN
pinjam.jam = jam_dtg.jam - 1
pinjam.menit = pinjam.menit + 60
            sel_waktu.menit = pinjam.menit - jam_brkt.menit
ELSE
            pinjam.jam = jam_dtg.jam
            sel_waktu.menit = pinjam.menit - jam_brkt.menit
END IF

IF (pinjam.jam < jam_brkt.jam) THEN
            sel_waktu.jam = (pinjam.jam + 24) - jam_brkt.jam
ELSE
            sel_waktu.jam = pinjam.jam - jam_brkt.jam
END IF

WRITELN(“-----------------------------------“)
WRITELN(“Perhitungan Lama Perjalanan”)
WRITELN(“-----------------------------------“)
WRITELN(“Waktu Keberangkatan”)
WRITELN(“Jam : “, jam_brkt.jam)
WRITELN(“Menit : “, jam_brkt.menit)
WRITELN(“Detik : “, jam_brkt.detik)
WRITELN(“-----------------------------------“)
WRITELN(“Waktu Kedatangan”)
WRITELN(“Jam : “, jam_dtg.jam)
WRITELN(“Menit : “, jam_dtg.menit)
WRITELN(“Detik : “, jam_dtg.detik)
WRITELN(“-----------------------------------“)
WRITELN(“Lama Waktu Perjalanan”)
WRITELN(“Jam : “, sel_waktu.jam)
WRITELN(“Menit : “, sel_waktu.menit)
WRITELN(“Detik : “, sel_waktu.detik)
WRITE(“-----------------------------------“)

















/*Program PERHITUNGAN_LAMA_PERJALANAN_2

 Menghitung lama perjalanan melalui selisih antara waktu
 keberangkatan dan kedatangan*/

#include<iostream.h>
#include<conio.h>

void main()
{
struct waktu
        {  int jam;
            int menit;
            int detik;  };

waktu jam_brkt;
waktu jam_dtg;
waktu sel_waktu;
waktu pinjam;

cout<<"Masukkan Waktu Keberangkatan (Jam) = ";cin>>jam_brkt.jam;
cout<<"Masukkan Waktu Keberangkatan (Menit) = ";cin>>jam_brkt.menit;
cout<<"Masukkan Waktu Keberangkatan (Detik) = ";cin>>jam_brkt.detik;
cout<<"--------------------------------------- \n";
cout<<"Masukkan Waktu Kedatangan (Jam) = ";cin>>jam_dtg.jam;
cout<<"Masukkan Waktu Kedatangan (Menit) = ";cin>>jam_dtg.menit;
cout<<"Masukkan Waktu Kedatangan (Detik) = ";cin>>jam_dtg.detik;

if(jam_dtg.detik < jam_brkt.detik)
                {pinjam.menit = jam_dtg.menit - 1;
                 pinjam.detik = jam_dtg.detik + 60;
                 sel_waktu.detik = pinjam.detik - jam_brkt.detik;}
else
                {pinjam.menit = jam_dtg.menit;
                 sel_waktu.detik = jam_dtg.detik - jam_brkt.detik;}

if(pinjam.menit < jam_brkt.menit)
                {pinjam.jam = jam_dtg.jam - 1;
                 pinjam.menit = pinjam.menit + 60;
                 sel_waktu.menit = pinjam.menit - jam_brkt.menit;}
else
                {pinjam.jam = jam_dtg.jam;
                 sel_waktu.menit = pinjam.menit - jam_brkt.menit;}

if(pinjam.jam < jam_brkt.jam)
                {sel_waktu.jam = (pinjam.jam + 24) - jam_brkt.jam;}
else
                {sel_waktu.jam = pinjam.jam - jam_brkt.jam;}

cout<<endl;
cout<<"----------------------------------- \n";
cout<<"Perhitungan Lama Perjalanan \n";
cout<<"----------------------------------- \n";
cout<<"Waktu Keberangkatan \n";
cout<<"Jam : "<<jam_brkt.jam<<endl;
cout<<"Menit : "<<jam_brkt.menit<<endl;
cout<<"Detik : "<<jam_brkt.detik<<endl;
cout<<"----------------------------------- \n";
cout<<"Waktu Kedatangan \n";
cout<<"Jam : "<<jam_dtg.jam<<endl;
cout<<"Menit : "<<jam_dtg.menit<<endl;
cout<<"Detik : "<<jam_dtg.detik<<endl;
cout<<"----------------------------------- \n";
cout<<"Lama Waktu Perjalanan \n";
cout<<"Jam : "<<sel_waktu.jam<<endl;
cout<<"Menit : "<<sel_waktu.menit<<endl;
cout<<"Detik : "<<sel_waktu.detik<<endl;
cout<<"-----------------------------------";
getch();
}
 

ALGORITMA PENGULANGAN ~ Teknik Informatika

Posted by  On 


1.            1   6   11
                2   7   12
                3   8   13
                4   9   14
                5   10 15

2.            1       2       3       4      5
                6       7      8       9
                10    11    12
                13    14
                15

3.            1
                2      6
                3      7    10
                4      8    11    13
                5      9    12    14    15

4.            1
                2      3
                4      5     6
                7      8     9      10
                11   12    13    14     15

1.            N ← 1
                for   i   ← 1 to 5 do
                        for   j   ← 1 to 3 do
                               write (N, " ")
                               N ← N + 5
                         endfor
                      writeln
                endfor

2.            N ← 1
                for   i   ← 1 to 5 do
                        for   j   ← 1 to (6 - i) do
                              write (N, " ")
                              N ← N + 1
                        endfor
                      writeln
                endfor

3.            N ← 1
                for   i   ←  1 to 5 do
                        N ← 1
                        for   j   ←  1 to (1 + i) do
                              write (N, " ")
                              N ← N + (5 - j)
                        endfor
                    writeln
                endfor
                             
4.            N ← 1
                for    i   ←  1 to 5 do
                       for   j   ←   1 to  i do
                               write (N, " ")
                               N ← N + 1
                               writeln
                       endfor
                    writeln
                endfor

Lirik Lagu

Posted by  On 
Bintang malam katakan (sampaikan) padanya
Aku ingin melukis sinarmu di hatinya
Embun pagi katakan padanya
Biar ku dekap erat waktu dingin membelenggunya
Tahukah engkau wahai langit
Aku ingin bertemu membelai wajahnya
Kan ku pasang hiasan angkasa yang terindah
Hanya untuk dirinya
Lagu rindu ini kuciptakan
Hanya untuk bidadari hatiku tercinta
Walau hanya nada sederhana
Ijinkan ku ungkap segenap rasa dan kerinduan

Lirik CHRISYE - Lirih

Posted by  On 
Kini tlah kusadari, dirimu tlah jauh dari sisi
kutau tak mungkin kembali kuraih, semua hanya mimpi
ingin ku coba lagi, mengulang yang telah terjadi
tetapi semua sudah tak berarti, kau tinggal pergi
Adakah kau mengerti kasih, rindu hati ini
tanpa kau disisi
mungkin kah kau percaya kasih, bahwa diri ini
inging memiliki lagi
kusadari kembaliuntuk, ternyata semua khayal diri
kini kutau tak mungkin ada waktu, untuk mencintaimu lagi
mungkinkah kau percaya kasih, bahwa diri ini
ingin memiliki lagi
mungkinkah kau percaya kasih, bahwa diri ini
ingin memiliki
lagi...
Langganan: Postingan (Atom)