Составить программу вычесления выражения а+б/аб
Пожалуйста быстрее!!!!!
Program a1; uses crt; var a,b,c:integer; begin writeln ('vvedite dva chisla'); readln (a,b); c:=(a+b) mod a*b writeln ('rezultat',c); readln; end.