var x,y,dist:real;
begin
readln(x,y);
dist:=sqrt(x*x+y*y);
readln(x,y);
x:=sqrt(x*x+y*y);
if (x>dist) then writeln('2-я точка ближе')
else if (x<dist) then writeln('1-я точка ближе')
else writeln('Одинаково')
end.
Вот так записывается.
N - количество => без наименования
i - нужное количество бит
Число имеет вид abba.
Сумма всех цифр равна a + b + b + a = 2a + 2b, число, образованное первыми двумя цифрами, равно 10a + b.
2a + 2b = 10a + b
8a = b
a, b — цифры, поэтому a = 0 или 1. Получаются два варианта номера: 0000 или 1881.
В восьмеричной системе счисления 0_10 = 0_8, 1881_10 = 3 * 512 + 5 * 64 + 3 * 8 + 1 = 3531_8
18.08.2006 17:05:05
-через 500 дней
05.05.2005 17:55:05-через 50 минут
07.05.2005 18:55:05-через 50 часов
05.05.2005 17:05:55-через 50 секунд