1+2=3 (2)
3^2=9(1)
9^2=81(1)
81+2=83(2)
83+2=85(2)
Ответ:21122
Var
x, y, z, d: real;
function min(a, b: real): real;
begin
if a < b then
min := a
else min := b;
end;
function max(a, b: real): real;
begin
if a > b then
max := a
else max := b;
end;
begin
readln(x, y, z, d);
writeln(max(min(x, y), max(min(x, z), min(z, d))));
end.
Делаем развернутую запись числа
3*8²+4*8¹+1*8°=192+32+1=225
Var
x: real;
begin
readln(x);
if x < 0 then
writeln(x * x)
else if x > 0.3 then
writeln(-x)
else writeln(x);
end.
<span>BIOS (Basic Input/Output System). Эта программа не обладает всей функциональностью операционной системы, но её достаточно для того, чтобы загрузить другую программу, которая будет загружать операционную систему.</span>