Var
i:integer;
s:real;
begin
s:=0;
for i:=1 to 10 do s:=s+i/10;
Writeln(s)
end.
<u>Результат</u>
5.5
Так как класс сети /29 то маска сети 255.255.255.248
Т.е начальный адрес будет 20.17.0.16 , а конечный 20.17.0.23
Ответ: 20.17.0.23
Var
a : array [1..100] of longint;
k,i : longint;
begin
k:=0;
for i:=1 to 5 do begin read(a[i]); if a[i]=k then k:=k+1; end;
writeln(k);
<span>end.</span>