SHARE
TWEET

Untitled

AlinaSereda Jan 14th, 2020 70 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. var
  2. n,i,a:integer;
  3. begin
  4.   readln(n);
  5.   for i:=1 to n do
  6.   begin
  7.     readln(a);
  8.     If (a mod 2 <> 0) and (a mod 10 <> 3 ) then
  9.       writeln('YES')
  10.       else
  11.         writeln('NO');
  12.   end;
  13.   Writeln('YES';or;'NO');
  14. end.
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
 
Top