Question

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

Answer 1

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

Answer 2

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