This nice Blogger theme is compatible with various major web browsers. You can put a little personal info or a welcome message of your blog here. Go to "Edit HTML" tab to change this text.
RSS

Minggu, 20 Desember 2009

PROGRAM ATM

Posted in | 21.16 | by ClubPoker-DNA

uses wincrt;

var

uang:longint;

begin

write('Banyaknya uang:Rp  ');raedln(uang);

if uang>100000 then

writeln('Tidak ambil uang di ATM')

else

writeln('Ambil uang di ATM');

end.



0 komentar:

Posting Komentar

Langganan: Posting Komentar (Atom)