fork download
copy 
  1. program czy_k_dzieli_m;
  2. var
  3.   k, m, q, r: integer;
  4. begin
  5. 	read(k, m);
  6. 	q := m div k;
  7. 	r := m mod k;
  8. 	if (r = 0) and (q * k = m) then
  9.     	writeln(k, ' dzieli ', m)
  10. 	else
  11.     	writeln(k, ' nie dzieli ', m);
  12. end.
Success #stdin #stdout 0.01s 5284KB
comments (?)
stdin
copy 
2 4
stdout
copy 
2 dzieli 4
https://ideone.com/QDDqvc
czy k dzieli m - przy użyciu div i mod
language:
Pascal (fpc 3.0.4)
created:
2 days ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!