1)
var n,i:integer;
begin
readln(n);
for i:=1 to n do write(random(11),' ');
end.
Пример:
10
5 2 9 5 7 2 10 0 1 6
2.
var s,i:integer;
begin
s:=0;
for i:=1 to 10 do s:=s+i;
write('s = ',s);
end.
Результат:
s = 55
Если Лена не покупала, значит вычеркиваем....
или Катя купила. значит Катя возможно купила
Маша тоже не купила.
получается купила Лена
О лене ничего не говорилось что она не покупала
ответ: ЛЕНА
10 Кбайт = 10 × 1024 байт = 10240 байт.
При длине сообщения 20480 символов на 1 символ приходится 10240 / 20480 = 0.5 байта = 0.5 × 8 = 4 бита.
Следовательно мощность алфавита составит 2⁴ = 16 символов.