Дано двузначное число. Определить:

а) входят ли в него цифры 4 или 7;

б) входят ли в него цифры 3, 6 или 9.

var a,b,n:integer;beginwriteln('n=');readln(n);a:=n mod 10; b:=n div 10;if (a= 4) or (b=4) or (a=7) or (b=7) then writeln('yes')else writeln('no');readln;end.__________________________var a,b,n:integer;beginwriteln('n=');readln(n);a:=n mod 10; b:=n div 10;if (a= 3) or (b=3) or (a=6) or (b=6) or (a=9) or (b=9) then writeln('yes')else writeln('no');readln;end.