512*16=8192(бит)
8192/8=1024(байт)
1024/1024=1(Кбайт)
Ответ:1 Кбайт
var
s: string;
begin
s := 'informatica';
writeln(s);
writeln(copy(s, 3, 5));
writeln(copy(s, 6, 3));
writeln(copy(s, 8, 3));
writeln(copy(s, 8, 2) + s[5]);
end.
Begin ... end - скобки для многострочного оператора. Используется
например для операторов цикла, условного оператора, функций и
обязательны для общего текста программы
write - вывод данных на консоль или в файл
read - считывание данных из консоли или файла
var - открывает раздел обьявления переменных, сокращение от variables