Var a,b,c:int64;
begin
read(a,b,c);
writeln(c);
writeln(a);
writeln(b);
<span>end.</span>
Номер 2 не является вещественной константой.
Ответ:
N = 25
1. Переводим в двоичную систему 25 (10) -> 11001 (2)
2.
2.1. Сумма битов равна 3 => 3%2 = 1 => 110011
2.2. Сумма битов равна 4 => 4%2 = 0 => 1100110
3. R = 1100110(2) = 102(10).
Uses GraphABC;
begin
line(300,50,300,450);
line(150,250,550,250);
line(300,50,295,60);
line(300,50,305,60);
line(550,250,540,245);
line(550,250,540,255);
<span>end.</span>