Чтобы перевести из восьмеричной в десятичную надо число(у нас 11) представить в виде суммы произведений степеней основания, а конкретнее
Складываем:
Теперь из десятичной переводим в двоичную:
Вначале 20/2=10(остаток 0), 10/2=5(остаток 0), 5/2=2(остаток 1),2/2=1(остаток 1)
И чтобы получить двоичную запись просто пишем остатки в обратом порядке:
===== PascalABC.NET =====
begin
ReadArrInteger(3).Select(p -> p.IsEven ? p * p : p).Println(',')
end.
Замечание: В Паскаль данные разделяются пробелами, или переводами строки (клавиша Enter), поэтому вводить черз запятую не выйдет )))
Var a,b,x:real;
begin
write('Введите a,b'); readln(a,b);
writeln('Уравнение: ',a,'x^2 + ',b,'x = 0');
x:=-b/a;
writeln('Корни уравнения: х=0 x=',x<span>);
</span>end.
Ответ:
Я думаю CTRL
Типо ctrl+c ctrl+v или как-то так