6 lines
108 B
Text
6 lines
108 B
Text
|
begin
|
||
|
|
integer a;
|
||
|
|
a := 3;
|
||
|
|
write( i_w := 1, s_w := 1, -a, 1 + number( not bitstring( a ) ) )
|
||
|
|
end.
|