Установите верный порядок следования команд при сортировке массива из 10 элементов по возрастанию методом выбора.

a[i]:=a[j]

p:=a[i];

end;

for i:=j+1 to 10 do

a[j]:=p;

for j:=1 to 9 do

if a[j]

program xxx;   var a,b, c : integer; begin

  writeln('введите 3 числа-');

  read(a,b,c);   if a> =0 then a: = sqr(a);

  if b> =0 then b: = sqr(b);

  if c> =0 then c: = sqr(c);

  writeln('ответ: ');

  write(a, b, c);

  readlnend.

желтый знак - нехватка памяти

все остальное - размер  

1 байт/с = 23 бит/с = 8 бит/с; 1 кбит/с = 210 бит/с = 1024 бит/с; 1 мбит/с = 210 кбит/с = 1024 кбит/с; 1 гбит/с = 210 мбит/с = 1024 мбит/с.