Считая, что каждый символ кодируется 1 байтом, определите информационный объем в байтах фразы: Певец-Давид быд ростом мал, но повалил же Голиафа!
Считая, что каждый символ кодируется 1 байтом, определите информационный объем в байтах фразы: Певец-Давид быд ростом мал, но повалил же Голиафа!
Ответ(ы) на вопрос:
Var s: string;
k: integer;
Begin
Write ('Введите Ваше предложение: ');
read(s);
k := length(s);
Write ('Размер: ',k);
End.
Не нашли ответ?
Похожие вопросы