V=2 кбайт
N=128
2кбайт=2048 байт=16384 бит
16384 бит:128=128 бит
N=2^i
N=2^7=128
128 символов
Var i,k:integer;
begin
k:=0;
for i:= 100 to 1000 do if (i mod 5=0) and (i mod 21=0) then k:=k+1;
write(k)
<span>end.</span>
Program Posled;
Var
a, b, sum1, sum2, sum3: integer;
Begin
read (a,b);
sum1 := (a mod 10) + (b mod 10);
sum2 := (a div 10 mod 10) + (b div 10 mod 10);
sum3 := (a div 100 mod 10) + (b div 100 mod 10);
if ((sum3 > sum2) and (sum2 > sum1)) then
write('OK')
else
write('NO');
<span>End.</span>
Значения n и s после каждого прохождения циклом даны в приложении.
Ответ: 180
Hardware id, версию системы, имя пользователя и еще некоторые системные данные. от ПО к ПО список разный