Program Hitung Jarak #pascal

 Ane lagi belajar nyoba2 bkin program kecil2an terus di pascal nih , walaupun sederhana ambil himahnya aja yak , hhee

Soal
Sebuah mobil melaju dengan kecepatan tetap k km/jam. Jika mobil tersebut berjalan selama j jam, tulislah algoritma untuk menghitung jarak yang sudah ditempuh mobil ( dalam km ). Algoritma tersebut membaca
masukan berupa k dan j , menghitung jk  (jarak) dengan rumus jk=kj. Kemudian buat ke dalam bahasa pascal .
(sumber soal : Buku Algoritma & Pemrograman dalam bahasa Pascal dan C - Rinaldi Munir )

Jawab
algoritmanya udah diotak aj yah ..
langsung coba di pascal aj , hhhe

========================================
program Hitung_jarak;
uses wincrt;


var
   k,j,jk: integer ;


begin
     writeln ('masukan kecepatan mobi : ');
     readln(k);
     writeln ('masukan waktu yang ditempuh : ');
     readln(j);
     jk:=k*j;
     writeln ('jarak yang ditempuh adalah : ',jk);
end.

========================================

ya itu deh yg ane bisa jawab , hhee ... masi belajar :D