Готово...........................
Var s:string; l:integer;
begin
write('Введите строку: ');
readln(s);
writeln('Первый символ: ',s[1]);
l:=length(s);
writeln('Последний символ: ',s[l]);
if l mod 2 = 1
then writeln('Средний символ: ',s[l div 2+1])
else writeln('Длина строки четна');
end.
Пример:
Введите строку: ПАСКАЛЬ
Первый символ: П
Последний символ: Ь
Средний символ: К
Задание 1.
Ответ под цифрой 4
Задание 2.
Ответ под цифрой 4.
Задание 3.
Найдем количество символов в статье:
<span>64·40·64 = 26·5·23·26 = 5 · 215. </span>
Один символ кодируется одним байтом, 210 байт составляют 1 килобайт, поэтому информационный объем статьи составляет
<span>5·215 байт = 5·25 килобайт = 160 Кб. </span>
___________________________________________
Информация – это обозначение содержания, полученного от внешнего мира в процессе приспособления к нему (Н. Винер).
Информация - снятая неразличимость, передача разнообразия (У.Р. Эшби).
Информация – снятая неопределенность (К. Шеннон).
Информация – отраженное разнообразие (А. Д. Урсул).
Информация – мера сложности структур, мера упорядоченности материальных систем (А. Моль).
Информация – мера неоднородности распределения материи и энергии в пространстве и времени (В. М. Глушков).
