Kabar Terbaru

Aplikasi Sederhana - Konversi Km Ke Mil Di Pascal (By Ronny Liem)
Aplikasi Sederhana - Konversi Km Ke Mil Di Pascal


program Konversi_;
Uses Crt;
var
nKM,sKM:Integer;
nML,hKMtoML:Real;


begin
clrscr;
nML:=1.609;
WriteLn(' >> APLIKASI SEDERHANA - KONVERSI Km Ke Mil  <<');
WriteLn('===============================================');
Write  ('> Nilai Dalam [KM] : '); ReadLn(nKM);
hKMtoML:=nKM*nML;
WriteLn('> Nilai Dalam Mil  : ' , hKMtoML);
WriteLn('    THANKS YOU FOR USING MY SIMPLE PROGRAM     ');
readln;
end.

Subscribe to receive free email updates:

0 Response to "Contoh Program Sederhana - Konversi Km Ke Mill Di Pascal"

Post a Comment