Rogram Menghitung Pulsa Dengan Paskal
Posted by Rozaq D' Acewell™
Program Menghitung_Pulsa;
Uses crt;
Var
detik : integer:
total : integer:
Begin
crlscr:
writeln(‘jumlah harga’);readln(detik);
total := detik * 10;
Wrteln (total harga=;total);
Readln;
End.