
HTML
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=UTF-8">
<title>Зимняя сказка</title>
<link rel="STYLESHEET" type="text/css" href="./st.css">
</head>
<body background="./images/BLUMRBLL.jpeg" text="#000000" link="#0000FF" vlink="#993366" alink="#0066FF" leftmargin="10" topmargin="10">
<h1 align="center"><b>Зимняя сказка</b></h1>
<p align="center"><img alt="зима" src="./images/winter.gif"></p>
<p align="justify">Зима медленно догорала под еще не жарким весенним солнцем. Сосульки, за долгую зиму наросшие на старой валежине, под которой находилась берлога Медведицы, тихо плакали в потемневший снег. Тогда-то и появился на свет (если только можно назвать "светом" царящие в берлоге сумерки) Медвежонок - маленькая меховая рукавичка с юрким блестящим кнопкой-носиком.
</p>
</body>
</html>
CSS
body{
scrollbar-arrow-color: #2B6868;
scrollbar-track-color: #B8E1E7;
scrollbar-face-color: #86B1B1;
scrollbar-highlight-color: #2B6868;
scrollbar-3dlight-color: #6CA2A2;
scrollbar-darkshadow-color: #4D8E8E;
scrollbar-shadow-color: #2B6868;
scrollbar-base-color: #c2c2c2;
}
a
{
text-decoration: none;
}
a:hover
{
text-decoration: none;
font-size: 14pt;
color: #033280;
size: 5;
alink: #0066FF;
}
var
d : array of integer;
n : integer;
function arrSumRec(d : array of integer; n : integer) : integer;
begin
if n > d.Length-1 then exit;
result := d[n]+arrSumrec(d, n+1);
n += 1;
end;
begin
write('введите количество элементов для массива ');
readln(n);
d := new integer[n];
d := arrRandom(n, 1, 100);
writeln('сгенерирован массив из ', n, ' элементов со значениями в диапозоне 1..100');
writeln(d);
writeln('Сумма = ', arrSumRec(d, 0));
end.
функция function arrSumRec(d : array of integer; n : integer) : integer; в качестве первого параметра получает массив сумму которого считаем в качестве второго номер члена начиная с которого считаем сумму. Не забываем что нумерация начинается с нуля. поэтому чтобы посчитать сумму всех членов массива в качестве второго параметра указываем 0.