Напишите программу в Паскале
A+b/c+c/ab

можно сократить, вместо 3х строк readin, писать ReadIb(a,b,c);

program test;var a,b,c:integer;beginreadIn(a);readIn(b);ReadIn(c);writeIn(a+b/c+c/a*b);end.вроде так