Составить таблицы сложения и умножения для 5-ричной системы счисления.

min і max нужно присвоить а[1].

t1 = s1/v1

t2 = s2/v2

v(sr) = (s1+s2)/(t1+t2)

ткань,глина,дерево,стекло,бумага,мктал,пласмасса,резина,лед

var i: integer;

s,z: real;

begin

    z: =8;

    for i: = 2 to 7 do begin

          s: =s+z;

          z: = z*(1+10/100);

    end;

    writeln(s);

end.