var n,i,rez:integer;
begin
write('Введите n: ');
readln(n);
rez:=0;
for i:=1 to n do
if odd(i) then rez:=rez+i
else rez:=rez-i;
writeln('rez=',rez);
end.
Var
text : string;
i : integer;
begin
write('Введите текст: ');
readln(text);
write('Результат: ');
for i := length(text) downto 1 do
write(text[i]);
<span>end. </span>
Переставьте местами строчки вниз и пока слева стена местами
В <em>head</em> внутри тега <span><title></span> заголовок <span><em><title></em><u><em>MySite</em></u><em></title></em></span>
Фон (если только HTML) - св-ва bgcolor и background у <em><body></em>: <span><em><body bgcolor="</em><u><em>red</em></u><em>"></em>
</span>
P.S. Прекрасный сайт об HTML и CSS: http://htmlbook.ru/