16^x бит = 64 кбайт
2^(4*x) бит = (2^6 + 2^13) бит
2^4x=2^19
4x=19
x=19/4
x=4.75
16^4.75=524288 бит = 64 КБ
Program n_1;
var x:integer;
begin
readln(x);
x:=(x mod 10) + ((x div 10) mod 10) + ((x div 100) mod 10);
if (x mod 2 = 0) then writeln('true')
else writeln ('false');
end.
(в программе 2 таких чисел не существует)
Program n_2;
var x, y:integer;
begin
readln(x);
y:=x*x;
x:=(x mod 10) + ((x div 10) mod 10) + ((x div 100) mod 10);
x:=x*x*x;
if (x=y) then writeln('true')
else writeln ('false');
end.
Program n_3;
var a, b, c:integer;
begin
read(a, b, c);
if (a=b) or (b=c) or (a=c) then writeln('true')
else writeln ('false');
end.
Ответ:
"Везде исследуйте всечасно что есть велико и прекрасно"
Объяснение:
Это решается с помощью шифра Цезаря. В задании обозначено, что буква "Д" соответствует букве "Я" закодированного сообщения.
Буква "Д" в алфавите по счёту пятая, буква "Я" - тридцать третья. (см. картинку 1). Это значит, что <em>сдвиг</em> будет воспроизводиться на шесть
Следовательно, получается фраза, данная мной в ответе (см. картинку 2)