Какое минимальное основание имеет система счисления, если в ней записаны числа 327, 282, 1051?

так как максимальная использованная цифра в записи 8, то система минимум 9-ричная

Написал по-быстрому 1)var a,b,s,p: real; begin readln(a); readln(b); s: =a*b; p: =(a+b)/2; writeln('s: = ',s); writeln('p: =  ',p); end. 2)var s: real; begin readln(s); if (s> =1000) then  s: =s-(s*0.1) writeln(s); end. 3)var i,a,n: integer; s: real; begin s: =0; readln(n); for i: =1 to n do readln(a); if (a  mod 2=0) then s: =s+a; writeln(s); end. 4)const n =10; var a: array[1..n] of integer; i: integer; s: real; begin s: =0; for i: =1 to n do  begin readln(a[i]); s: =s+(a[i]); end; writeln(s/n); end.

Program p1; var   a, b, c, s: real; begin   writeln('вычислите s поверхности параллелепипеда.');   writeln('введите исходные данные: ');   write('длина(см)? '); readln(a);   write('ширина(см)? '); readln(b);   write('высота(см)? '); readln(c);   s : = 2 * (a * b + b * c + c * a);   writeln('площадь поверхности: ', s, ' кв.см.') end. тестовое решение: вычислите s поверхности параллелепипеда. введите исходные данные: длина(см)? 9 ширина(см)? 7.5 высота(см)? 5 площадь поверхности: 300 кв.см. program p2; var   ct,ck,s: real;   kt,kk: integer; begin   writeln('вычисление стоимости покупки');   writeln('введите исходные данные: ');   write('цена тетради( '); readln(ct);   write('количество тетрадей? '); readln(kt);   write('цена карандашей( '); readln(ck);   write('количество карандашей? '); readln(kk);   s: =ct*kt+ck*kk;   writeln('стоимость покупки: ',s: 0: 2,' руб.') end. тестовое решение: вычисление стоимости покупки введите исходные данные: цена тетради( 2.75 количество тетрадей? 5 цена карандашей( 0.85 количество карандашей? 2 стоимость покупки: 15.45 руб.