N=2 в степени i . Если так надо
11011111 = 223
11011001 = 217
11000011 = 195
11000000 = 192
Var
n, p, i: integer;
begin
readln(n);
i:=1;
p:=3;
while true do
if i<=n then
begin
i:=i+p;
p:=p+2;
end
else
begin
write(i);
exit;
end;
<span>end.</span>
CD карта или диск. Облако в интернете
1) 70 2) 8 в третьем нужно использовать цикл for. что-то вроде s = 261;
for (i =261;i<287;i++) {
s = s + s}