1. Выделяем текст, на который должна быть ссылка
2. Правой кнопкой мыши нажимаем на выделенном фрагменте и в выпвшем меню выбираем Гмперссылка. Или в верхнем меню выбираем Гиперссылка (<span><span>hyperlink</span></span>)
В HTML будет так - <a href="http://sait.ru">Текст ссылки </a>
<span>uses crt;
procedure Prost(a:longint;var f:boolean);
var i:longint;
begin
if a<3 then f:=false
else
begin
f:=true;
for i:=2 to round(sqrt(a)) do
if a mod i=0 then f:=false;
end;
end;
var a,b,i,k:longint;
f:boolean;
begin
clrscr;
repeat
writeln('Введите диапазон натуральных чисел a<b:');
readln(a,b);
until (a>=0)and(b>a);
k:=0;
for i:=a to b do
begin
Prost(i,f);
if f then
begin
write(i,' ');
k:=1;
end;
end;
if k=0 then writeln('Простых чисел в интервале ',a,' ',b,' нет!');
readln
end.</span>
S:=0;
for i:=1 to 7 do begin
s:=s+sin(x);
x:=x+x;
end;
Остальную программу сам допишешь.
Program test ;
Var
N, num:integer;
Begin
Readln(N) ;
Num:=(2*1) +(2*2) +(2*N) ;
Writeln(num) ;
end.