Komentar

Jumat, 05 Juli 2013

Bebek Untuk Teman

Posted by M Habibie 20.02, under | No comments





var
 a,b,n:word;
 m:word;




begin
 read(n);
 readln(m);
  
 a:=n div m;
 b:=n mod m;
  
 write('masing-masing '); writeln(a);
 write('bersisa '); writeln(b);
end.

0 komentar:

Posting Komentar

Your Ip Address

Your IP Address

IP

Popular Post

Popular Posts