Стаблицей истинности f=x3*x1*(x2*x1*x3) умоляю, можно в письменном виде вас( 15

Во-первых, не "10 ричная" система счисления, а десятичная.
А во-вторых, надо составить уравнение, используя расширенное представление числа в системе счисления по основанию n. Из условия следует, что n>4 (цифра 4 не может присутствовать в записи числа по основанию меньше 5) и n<10 (в десятичной системе счисления число двухзначное, а три знака возможны только в системе счисления с меньшим основанием).

Относительно a и b можно утверждать, что оба они целые, a ∈ [1;9], b∈ [0;9]
При этих ограничениях получается, что число 30 должно быть кратно n, следовательно n=5.
Можно также найти a и b, несмотря на то, что по условию этого не требуется.
b=6-5a и это возмжно только при a=1. Тогда b=6-5=1.
Искомое число - 114 в пятиричной системе счисления.

ответ: N=5

1)
 program numOp;
  var a,b:longint;
 begin
  write('a='); readln(a);
  write('b='); readln(b); writeln;
  writeln('Среднее арифметическое: ',((a+b)/2):0:2);
  writeln('Сумма: ',a+b);
  writeln('Разность: ',a-b);
  writeln('Произведение: ',a*b); readln;
 end.
2)
 program triangleInf;
  var
   kat1,kat2:longint;
   gip,s:real;
  begin
   write('Катет1: '); readln(kat1);
   write('Катет2: '); readln(kat2);
   gip:=sqrt(sqr(kat1)+sqr(kat2)); s:=kat1*kat2/2;
   writeln('Гипотенуза: ',gip:0:2);
   writeln('Площадь: ',s:0:2); readln;
  end.