Составьте логическое выражение по схеме:

program xxx;

var s : string;

        а : integer;

begin

    writeln ('введите слово-');

    readln (s);

    а: = length(s)

    writeln ('длина слова=', a);

    readln

end.

var

n: integer;

begin

readln(n);

if (n mod 10)=(n div 100) then

writeln('палиндром')

else

writeln('не палиндром');

end.

режим разметки страницы,режим структуры,режим чтения.режим веб документа-

в системе ascii 1 символ кодируется 1 байтом, в юникоде 2 (ну так, к слову)

текст наш состоит из 30 символов (пробелы и знаки припинания тоже считаем), значит он занимает 30 байт = 240 бит