См. Приложения.
В Excel копируя элементы собираем схему и заполняем таблицу.
Program tet;
var i:byte;
a,s1,s2,s3:real;
beginwriteln(' введите значение а');readln(a);s1:=1;s2:=1;for i:=1 to 64 do if i mod 2=1 then s2:=s2*(a-i) else s1:=s1*(a-i);s3:=s2/s1;writeln(s3);<span>end.</span>
const
n = 3;
var
a: Array[1..n, 1..n] of Integer;
j, i, s: integer;
begin
Randomize;
Writeln('Случайная матрица:');
for i := 1 to n do
begin
for j := 1 to n do
begin
a[i, j] := Random(51) - 25;
Write(a[i, j]:5);
end;
Writeln
end;
for i := 1 to n do
begin
j := n + 1 - i;
s := s + a[i, j];
end;
Writeln('Сумма элементов побочной диагонали: ', s);
Readln
end.
Тэг <a href=#имя_метки> Текст ссылки </a>
Чтобы обозначить метку(якорь) испоьзуется тэг:
<a name = имя> целевой текст </a>
и т.д цвета и тому подобное в приложении смотри)
COUNTRY:
USA : RUSSIA:
INFO : ;washington.txt INFO:
culture.txt industry.txt ; culture.txt