Matematika Kelautan III

      

    

    BP2IP MALAHAYATI ACEH   

NAUTIKA PELAYARAN

                    https://poltekpelaceh.ac.id/

          https://smtcglobalinc.com/

     https://opito.com/

Matematika Profesi Kelautan

Bismillah

Asssalamualaikum...Jaya Nusantara

Scala

    Dalam kehidupan sehari-hari,baik dalam bidang teknik maupun maupun Perkapalan dan Kontruksi skala selalu digunakan untuk mendesain gambar dengan maksud  lebih memudahkan dalam membaca ataupun merekayasa dari rencana gambar tersebut dibuat atau bangun aslinya.Skala ialah bentuk perbandingan senilai dari ukuran suatu besaran nyata

    Jika kita membaca suatu peta, maka disana akan tertulis skala tersebut , Misalnya tertulis  1: 200000 cm Artinya jarak 1 cm pada peta tersebut sama dengan 200.000 cm pada jarak sebenarnya. Dalam ilmu gaya atau fisika  maka besar nya gaya diasosisikan dengan ukuran sentimeter sebagai contoh 1 cm mewakili 100

Newton maka ditulis 1 cm: 100 N.

Contoh :
1.Sebuah Kapal Berlayar Dari satu Kota ke Kota lainnya .Jarak dua Kota pada peta 17,5 cm.Jika skala peta tersebut 1 : 300.000, berapakah jarak kedua kota itu sesungguhnya  :

Jawab :

Diperoleh perbandingan senilai :

1.x  = 17,5.300.000
   x  = 5.250.000 cm
   x  = 52.5 km
   x  = 84.4725 Mil [Laut]

Jadi Jarak kedua kota tersebut adalah 52,5 Km atau 84,4725 Mil [Laut]


Tampilan Hasil Dengan Microsoft Excel
Hasil menggunakan Microsoft Excel Menggunakan rumus:
https://www.microsoft.com/id-id/microsoft-365/excel

Tampilan Hasil Desain Program Menggunakan
Bahasa Pemogram Ruby Gui Tk Widget

https://rubyinstaller.org/downloads/

Listing Program Perbandingan Senilai Dengan
Menggunakan Ruby Gui Tk Widget

scala.rb

require 'tk'
require 'tkextlib/tile'

Frmscala = TkRoot.new do 
title "Perbandinngan Scala Jarak Peta"
background 'Blue'
minsize(620,270)

end

$ukuran        = TkVariable.new
$skala          = TkVariable.new
$jarak           = TkVariable.new
 $hsljarak      = TkVariable.new
 $cm              = TkVariable.new
 $km              = TkVariable.new
$mil              = TkVariable.new

TkLabel.new(Frmscala) do
text "Ukuran Scala :"
grid('row'=>0, 'column'=>0, 'padx'=>10, 'pady'=>10) 
end
TkEntry.new(Frmscala) do
textvariable $ukuran
grid('row'=>0, 'column'=>1)
end
TkLabel.new(Frmscala) do
text "Masukkan Perbandingan Scala:"
grid('row'=>0, 'column'=>2, 'padx'=>10, "pady"=>10)
end
TkEntry.new(Frmscala) do
textvariable $skala
grid('row'=>0, 'column'=>4)
end
TkLabel.new(Frmscala) do
text "Jarak Kedua Kota Dalam Peta:"
grid('row'=>1, 'column'=>0, 'padx'=>10, 'pady'=>10) 
end
TkEntry.new(Frmscala) do
textvariable $jarak
grid('row'=>1, 'column'=>1)
end

TkLabel.new(Frmscala) do
text "Cm"
grid('row'=>1, 'column'=>2, 'padx'=>10, 'pady'=>10) 
end

TkButton.new(Frmscala) do
text "Hitung "
command{proces}
grid('row'=>4, 'column'=>0, 'padx'=>10, "pady"=>10)
end
TkLabel.new(Frmscala) do
text "Jarak Kedua Kota Adalah :"
grid('row'=>5, 'column'=>0, 'padx'=>10, "pady"=>10)
end

TkEntry.new(Frmscala) do
textvariable $cm
grid('row'=>5, 'column'=>1)
end
TkLabel.new(Frmscala) do
text "Cm"
grid('row'=>5, 'column'=>2, 'padx'=>10, "pady"=>10)
end

TkEntry.new(Frmscala) do
textvariable $km
grid('row'=>6, 'column'=>1)
end

TkLabel.new(Frmscala) do
text "Km"
grid('row'=>6, 'column'=>2, 'padx'=>10, "pady"=>10)
end

TkEntry.new(Frmscala) do
textvariable $mil
grid('row'=>7, 'column'=>1)
end

TkLabel.new(Frmscala) do
text "Mil [Laut]"
grid('row'=>7, 'column'=>2, 'padx'=>10, "pady"=>10)
end
    def proces
    begin  
    $cm.value          =  $jarak * $skala
    $hsljarak.value  =  $jarak * $skala / 100000 
    $km.value          =  $hsljarak 
    $mil.value          =  $km * 1.609
             
    rescue 
    $km.value = ""
    $mil.value = ""
    end
    end
Tk.mainloop()

Alhamdulillaah
Selamat Mencoba yaa wassalam