C++ :

#include<iostream>
using namespace std;
int main()
{
int a,b;
cin>>a;
cin>>b;
cout<<a%b;
}

Pascal :

var a,b:longint;
begin
  readln(a,b);
  writeln(a mod b);
end.