Var a,b,c,x,y:integer; begin
read(a,b,c);
x:=a;
y:=b;
if ((a*x+b*y)/c) mod c=0 then writeln('yes') else('no');
end.
Ссылается на ошибку в конце в на mod c=0, говоря, что операция неприменима к операндам этого типа. В чем дело?
read(a,b,c);
x:=a;
y:=b;
if ((a*x+b*y)/c) mod c=0 then writeln('yes') else('no');
end.
Ссылается на ошибку в конце в на mod c=0, говоря, что операция неприменима к операндам этого типа. В чем дело?