//PascalABC.NET 3.3,сборка 1611 от 06.01.2018
//Внимание! Если программа не работает, обновите версию!
begin
var m:=readinteger('m='); var y:=0.0; var x:=1.0;
for var i:=1 to m do
begin
y:=7*x**3+14*x/3-6;
x:=i+0.2;
writeln('y=',y:0:4,' ','x=',x);
end;
end.
Справа откладываем триады (3 символа)
Каждую триаду переводим в 10-тичную систему
10 101 010 001 110 = 2 5 2 1 6
Значит 10101010001110 (2) = 25216 (8)
Вот 999 в двоичное система. Держи: 1111100111
Такая информация называется Достоверной