ROTATION - Quay bánh xe
Tác giả: flashmt
Ngôn ngữ: Pascal
var n,i,a,b:integer;
re,c,f:byte;
begin
re:=0;
readln(n);
for i:=1 to n-1 do
begin
readln(a,b,c);
if c=1 then inc(re);
end;
write(re mod 2);
end.
Tác giả: flashmt
Ngôn ngữ: Pascal
var n,i,a,b:integer;
re,c,f:byte;
begin
re:=0;
readln(n);
for i:=1 to n-1 do
begin
readln(a,b,c);
if c=1 then inc(re);
end;
write(re mod 2);
end.