В чем заключаются особенности "Права и этики в сети Internet"?

jrjkj rjkf_rjkjrjkf b yf rjkf[_rjkjrjkf

uses crt; var n: integer; beginread(n)n: =abs(n)-2; write(n); end.

var

i: integer;

begin

for i: =100 to 999 do

if ((i+1) mod 2=0) and ((i+2) mod 3 =0) and ((i+3) mod 4=0) and ((i+4) mod 5 =0)

then writeln(i);

end.

пщояк 17 27 16 33 17

нщёп 15 27 7 17