В такой программе, пишет что "=" не применимо к integer... var n, a, k: integer;
begin
readln(n, a);
if (n+a) mod 2=0 or (n+a) mod 2=1
then writeln(k - (k div n) * n )
end.
begin
readln(n, a);
if (n+a) mod 2=0 or (n+a) mod 2=1
then writeln(k - (k div n) * n )
end.
More Questions From This User See All