Var b: integer;
a: boolean;
begin
a:=true;
if a then b:=4
else b:=-4;
writeln(b)
end.
Var
i:integer;
begin
for i:=10 to 99 do begin
if i mod 15=2 then
writeln(i);
end;
readln;
<span>end.</span>
1)2*297+235=829 2)2*235+468=938 3)938-829=109 <span>виграла Ганнуся, вона набрала на 109 очок більше</span>
134217728 ^ y бит = <span>8 ^ х бит
65536 ^ x бит = 16777216 ^ y бит
</span><span>
</span>134217728 ^ y бит = 8 ^ х бит
16777216 ^ y бит = 65536 ^ x бит
8 ^ y бит = (1/8192) ^x бит
2 ^ 3y бит = 2 ^ (-13x) бит
x = - (3y / 13), y = - (13x / 3)