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