Сочинение робототехника и техническое творчество в образовательном дошкольной организации

Расписание.меропреятия,я думаю тмк

Program pr_1;
a:array [1..n] of real;
n, i:integer;
begin
readln(n)
for i := 1 to n do
begin
a[i] := readln()
if a[i] <0 then a[i] := a[i] - 5;
else a[i] := i;
end;
writeln(a);
end.

1 килобайт- 1024 байта,
А значит 11 килобайт - 11.264 байта,
1 байт - 8 битов,
А тогда 11.264 байтов - 90112 битов,
Решение:
I=90112 
K=11264 
N- ?

N-2i
I = K*i , i =I/K
i = 90112/11264 = 8(бита)
N = 2(8) = 256 (символа)
Ответ: 256 символов.

Вариант под номером 2