program Unnamed;
uses crt;
function IsEqual(arg0 : Integer) : Boolean;
var flag : Boolean;
dig1, dig2, dig3, dig4 : Integer;
begin
dig1 := arg0 mod 10;
arg0 := arg0 div 10;
dig2 := arg0 mod 10;
arg0 := arg0 div 10;
dig3 := arg0 mod 10;
arg0 := arg0 div 10;
dig4 := arg0;
if(dig1 = dig4) and (dig2 = dig3) then
IsEqual := True
else
isEqual := False;
end;
begin
writeln(IsEqual(4334));
end.
Задача 1.
Информационный вес одного символа стандартного компьютерного алфавита из 256 символов = 8 бит или 1 байт, т.к. 256 = 2^8
512 = 2 * 2^8, т.е. вес одного символа алфавита из 512 символов будет 16 бит или 2 байта.
1024 * 16 = 16384 бита или 2048 байта.
Задача 2.
1/256 Мб = 1024/256 Кб = 4 Кб или 4096 байт
4096/4096 = 1
Каждый символ в сообщении весит 1 байт или 8 бит.
Мощность алфавита = 2^8 = 256 символов.
Задача 3.
8 Кб = 8192 байта
8192/2048 = 4 байта.
Каждый символ в сообщении весит 4 байта или 32 бит.
Мощность алфавита = 4 * 2^8 = 1024 символа.
целые числа), перемещающую Чертёжника из точки c координатами (x, y) в точку с координатами (x + a, y + b). Если числа a, b положительные, значение соответствующей координаты увеличивается; если отрицательные – уменьшается. Например, если Чертёжник находится в точке с координатами (9, 5), то команда Сместиться на (1, –2) переместит Чертёжника в точку (10, 3).
Запись
Повтори k раз
Команда1 Команда2 Команда3
конец
означает, что последовательность команд Команда1 Команда2 Команда3
повторится k раз.
Чертёжнику был дан для исполнения следующий алгоритм:
Повтори 3 раз
Сместиться на (–2, –3) Сместиться на (3, 2) Сместиться на (–4, 0)
конец
На какую одну команду можно заменить этот алгоритм, чтобы Чертёжник оказался в той же точке, что и после выполнения алгоритма?
1) Сместиться на (–9, –3)
2) Сместиться на (–3, 9)
3) Сместиться на (–3, –1)
4) Сместиться на (9, 3)
s=input()[:4];
print (s==s[::-1])