ac1047.pas
来自「某牛人写的acm.tongji.edu.cn上大部分ac的代码,仅供学习研究,请」· PAS 代码 · 共 11 行
PAS
11 行
program tju1047;
var
t,i,n:longint;
begin
read(t);
for i:=1 to t do begin
read(n);
writeln(ord(n mod 4 in [1,2]));
end;
end.
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?