Question

Определить, верно ли, что при делении неотрицательного числа А на положительное целое число В получается остаток равный одному из двух заданных чисел r или s.
Составить линейную программу в паскале.

Answer 1

var a,b,r,s,c:integer;
begin
readln(a,b);
readln(r,s);
c:=a mod b;
writeln((c=r)or(c=s));
end.

Пример:
18 4
2 5
True