Найдите основания систем счисления x и y, если известно, что 87x=73y и 62x=52y. в ответе запишите число, составленное из чисел y и x, записанных подряд без пробелов. например, если x=13 и y=15, ответ запишется как 1513.

Var multiplication, summ: real; i: integer; massive = array[1..15] of real; begin multiplication: =1; randomize;     for i: =1 to 15 do     begin       massive[i]: =random(20)-20;       multiplication: =multiplication  * massive[i];         summ: =summ+massive[i];     end;     if  multiplication  > summ     then           begin             writeln('multiplication elements of massive more');         end     else           begin               writeln('summ  elements of massive more');           end; end.

Интересная ) var i,n : integer; begin   n: =99;   for i: =1 to n do begin        case i of          11..14 : writeln('мне ',i,' лет');           else              case i mod 10 of          1: writeln('мне ',i,' год');           2..4: writeln('мне ',i,' года');           else              writeln('мне ',i,' лет');               end;         end;   end; end.