Я думаю, что это слон или зебра
а вообще какое-то чудовище, но красивое )
Все умножается на 4.Дальше сама подумай.
Если тебе нужно перевести число(целое) из десятичной системы счисления в любую другую,то ты делишь данное число на основание системы счисления,в которую тебе нужно перевести. В данном случае делили десятичное число(целое) 754 на 2(т.к. двоичная сис-ма счисления) на 8 и на 16.
Var a,b,n:integer;
begin
a:=1;
n:=-10;
while n<=15 do
begin
if n<0 then a:=a*n else b:=b+n;
n:=n+1;
end;
write (a:6,b:6);
<span>end.</span>
<span>1232345678910 + 1234567910 = </span>1233580246820