Объяснение:
program su;
var n,m,k : integer;
begin
read(n,m,k);
if (n mod k=0) or (m mod k=0) then
write('yes') else write ('no'); readln
end.
