program int7;var a,b:integer;begin writeln('Give 2 integers: '); readln(a,b); writeln(a,' MOD ',b,' = ',a mod b);end.