A*b mod m если a,b,m меньше 2*10^100

вот так, если я правильно поняла задание var     a, b, m: integer; begin     readln(a, b, m);     writeln((a * b) mod m); end.