Program Menghitung Pulsa Dengan Pascal

0 Comment
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.

0 Comment:

Posting Komentar

_Pasopati 2010 UYP™

Copyright 2011 Designing a dream come true.
Blogger Templates By:Noct.