Delphi. Какое значение получит k?
var i, j, k: byte;
i:=1; k:=0;
while i<3 do begin
inc(i);
for j:=1 to i do inc(k);
end;

uses crt;

const n=10;

var a: array[1..n] of integer;          

 i,j,k: byte; c: integer;

begin  

randomize;  

clrscr;  

writeln('исходный массив: ');  

for i:=1 to n do   begin    

a[i]:=random(19)-9;  

 write(a[i]:3);   end;  writeln;

 k:=0;  for i:=1 to n-1 do   f

or j:=i+1 to n do    if a[i]>a[j] then     begin      

c:=a[i];      

a[i]:=a[j];    

 a[j]:=c;      

inc(k);    

end;  

writeln('результат сортировки: ');

 for i:=1 to n do   write(a[i]:3);  

writeln;  

writeln('кол-во перестановок = ',k);

end.

Используйте команду <img src="...">

Без атрибутов это будет выглядеть как <img src="моя_картинка.jpg">

путь до картинки должен быть относительно страницы сайты

ПРИМЕР:

страница сайта:  index.html  

картинка в том же каталоге где и сама страница, тогда <img src="моя_картинка.jpg"> , если рядом с index.html есть каталог "АрхивФото" и картинка в нем, тогда <img src="АрхифФото/моя_картинка.jpg">

Советую прочитать про атрибуты. Они правильно разместить картинку на странице.

Например

<img src="img/моя_картинка.jpg" align="left" vspace="10" border="3" alt="Названия моей картинки">

Означает что текст будет обтекать справа, отступ по ширине 10 пикселей, название картинки "Названия моей картинки"

Если конечно у вас будет присутствовать текст.