На столько хватило времени.
Еще можно при помощи макросов автоматизировать ведение базы до 60000 записей
Объяснение:
^ не ставится у меня, но выполняет свои действия, у себя его ставьте!
Если на паскале, то
var
x: integer;
y: real;
begin
readln(x);
if x < 0 then
y := x*x+5*x
else
y := sqrt(x+6);
writeln(y);
<span>end.
Если в виде блок-схемы, то прикрепил картинку</span>
[33 / 8] = 4
33 - 4*8 = 1
Десятичное 33 в восьмеричном представлении = 41