<h3>PascalABC.NET 3.4.2, сборка 1864 от 11.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var a:int64;
Read(a);
(a = 2 ? -1 : (a * a + 1) div 2).Println
end.
<h3>Пример</h3><h3>13</h3><h3>85 </h3>
Ответ:
16
Объяснение:
С 61 по 64 - 4 процента щупалец
При условии, что каждое щупальце занимает 4%(так получается наименьшее допустимое кол-во щупалец) мы получим, что их 25.
Где на 60% идёт 60/4=15 щупальце.
А на 64 заканчивается 16.
Program adres;
begin
writeln ('мой адрес: здесь пиши свой адрес');
writeln ('мой телефон: 8 888 88 88');
end.
A[1]=-3
A[2]=0
<span>A[3]=5
</span><span>A[4]=12
</span><span>A[5]=21
</span><span>A[6]=32
</span><span>A[7]=45</span>
Понятным и несущим новую, неизвестную нам ранее информацию