201 206 213 207 209 205 192 211 201 203 192 - информатика
Вот перевод в десятичную систему:
1110(2) = 1*2^3+1*2^2+1*2^1+0*2^0 = 8+4+2 = 14
1001(2) = 1*2^3+0*2^2+0*2^1+1*2^0 = 8+0+0+1 = 9
14+9=23
А10=1997,25=1*10^3+9*10^2+9*10^1+7*10^0+2*10^(-1)+5*10^(-2)
A16=918=9*16^2+1*16^1+8*16^0
A8=145=1*8^2+4*8^1+5*8^0
A2=101010=1*2^5+0*2^4+1*2^3+0*2^2+1*2^1+0*2^0
Var a, sqr : integer;
f1, f2 : text;
begin
assign(f1, 'input.txt'); reset(f1);
assign(f2, 'output.txt'); rewrite(f2);
read(f1, a, sqr);
if a = sqr then
write(f2, 'YES')
else
write(f2, 'NO');
close(f1); close(f2);
end.