<u>PascalABC.NET 3.4.0, сборка 1670 от 23.05.2018</u>
<u>Внимание! Если программа не работает, обновите версию!</u>
begin
var x:=ReadReal('x=');
var r:=Sqrt(Abs((Sqr(x**5-3)-5)/(5*x-7))+7)+10*x;
Print(r);
r:=Round(r);
Println(r)
end.
<u>Пример</u>
x= -12.502
36508.4531755161 36508
<em>// PascalABC.NET 3.3, сборка 1627 от 27.01.2018</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var a:=ArrRandom(ReadInteger('n='),-50,50); a.Println;
var imin:=a.IndexMin; a:=(a?[:imin]+Arr(0)+a?[imin:]).ToArray;
var imax:=a.IndexMax; a:=(a?[:imax+1]+Arr(0)+a?[imax+1:]).ToArray;
a.Println
end.
<u>Пример</u>
n= 15
-32 11 7 8 -25 42 39 18 25 -33 -4 10 41 25 -36
-32 11 7 8 -25 42 0 39 18 25 -33 -4 10 41 25 0 -36
Способы соединения в локальную сеть четырех компьютеров-серверов представлены на прикрепленном изображении <em>(иллюстрация 1)</em>:
- линия
- звезда
- кольцо
- полносвязная
- шина
- дерево
Самым коротким и оптимальным способом соединения для передачи информации между четырьмя сетевыми устройствами будет шина
Обозначения на иллюстрации (<em>иллюстрация 1</em>):
- эллипс - сетевое устройство (компьютер-сервер)
- линия - канал связи
Это что за шифр?log без параметров не используется