program mas; var i,j:integer; a:array [1..10] of integer; begin randomize; for i=1 to 10 do begin a[i]:=random(10); end; for i=2 to 10 do begin j:=j+a[i]; i:=i+1; end; writeln(j); readln; end.
Т.к. наибольшая цифра в числе "силен" =5, а С=1, то остальные четыре цифры в данном числе будут 2, 3, 4, 5. Т. к. Н<6, то И=2. А значит, Н=4. Т.к. Л>Е, то Л=5, Е=3. А тогда уже легко находим остальные цифры: Ш=8, Р=9. В итоге получается: 9382+3152=12534. Ответ: 9382+3152=12534.