Var
i, a, b, n, n2, j: longint;
s: string;
flag: boolean;
begin
Write('Введите натуральное число больше 11: ');
Readln(a);
if a <= 11 then Writeln('11 - первое симметричное число')
else begin
Str(a, s);
n := Length(s); n2 := n div 2; flag := true; i := 1;
repeat
flag := (s[i] = s[n - i + 1]);
i := i + 1
until (not flag) or (i > n2);
if flag then Write('Число симметричное')
else Write('Число несимметричное')
end;
end.
Тестовое решение:
Введите натуральное число больше 11: 123454321
Число симметричное
Ответ:
1) Общем случае система команд процессора включает в себя следующие четыре основные группы команд:
· команды пересылки данных;
· арифметические команды;
· логические команды;
· команды переходов.
2) Через ОС
Что такое программа?
Компью́терная програ́мма — 1) комбинация компьютерных инструкций и данных, позволяющая аппаратному обеспечению вычислительной системы выполнять вычисления или функции управления.
А так, как я поняла вопрос. Берестяные грамоты" содержит 18 символов, включая пробел между словами.
При однобайтной кодировке (ASCII), она займет 18 байт, а при двухбайтной (UNICODE) - 18х2=36 байт.