Начнем с того, что даже если вам каким-то образом удастся получить IP адрес пользователя вк, то это вам ровным счетом ничего не даст. В лучшем случае вы узнаете город, в котором находится этот человек и больше ничего. И это только в том случае, если этот субъект не использовал средства анонимизации. Как мы видим, в большинстве случаев у людей возникают проблемы достаточно серьезного характера: кого то шантажируют, на кого то клевещут, рас ложные сведения и т.д. В большинстве случаев злоумышленник перестраховывается и использует средства анонимизации. Поэтому полученный IP адрес вполне вероятно окажется IP адресом какого-нибудь анонимайзера или впн сервиса.
//PascalABC.NET v3.3 1633
var arr: array [1..6, 1..6] of integer;
begin
for var i:=1 to 6 do
for var j:=1 to 6 do
arr[i, j]:=random(-49, 50);
writeln('Исходный массив: ');
for var i:=1 to 6 do
arr[i].PrintLn(', ');
var num:=0;
for var i:=1 to 6 do
if arr[i, 2] < 0 then num += 1;
writeln('Количество отрицательных элементов второго столбца: '+num);
for var i:=1 to 6 do
for var j:=1 to 6 do
if arr[i, j] > 0 then arr[i, j]:=-49;
writeln('Новый массив: ');
for var i:=1 to 6 do
arr[i].PrintLn(', ');
end.
Сейчас напишу в комментариях