Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
81920 бит : 8 = 10240 байт
10240 байт : 1024 = 10 килобайт
var
s: string;
i: longint;
begin
readln(s);
for i: =1 to length(s) div 2 do write(s[i]);
end.
Популярные вопросы