Получится 3e3f5660 ,а вообще перемножаем и записываем если больше шестнадцати в следующий разряд
Интерфе́йс<span> (англ. interface) — общая граница между двумя функциональными объектами, требования к которой определяются стандартом; совокупность средств, методов и правил взаимодействия (управления, контроля и т.д.) между элементами системы.</span>
Var num, deg: integer;res: real;i: byte;begin write('Число: '); readln(num); deg:=6; res := 1; i := 0; while i < abs(deg) do begin res := res * num; i := i + 1 end; if deg < 0 then res := 1 / res; writeln(res); readlnend.
Var A,B,C,N,X:real;
begin
read (A,B,C);
N:=(A-B*C*C)/B*B-2.5*C;
X:=(Sqrt (Abs (N)))/A*B*C;
writeln (N);
writeln (X);
end.