1. <span>3,22E+09 читается как 3,22×10⁺⁹. Следовательно, надо запятую перенести ВПРАВО на 9 позиций. Получим число 3220000000
2. </span><span>1 005 001 000 000 - запятые Вы тут зря указали, конечно, Группы разрядов отделяйте пробелами, мы не в Америке.
Тут можно записать по-разному, смотря где Вы поставить запятую пожелаете.
Если как в первом примере, то запятая передвинется ВЛЕВО на 12 позиций и получим число 1,005001×10⁺¹², которое записывается </span>
1.005001E12 или <span><span>1.005001E+12</span> </span>
............................................
Var
i,k,m,r,p,j:integer;
a:array[1..10]of integer;
begin
writeln('Массив: ');
for i:=1 to 10 do
begin
a[i]:=random(10);
write(a[i],' ');
end;
writeln;
write('Введите K,M,R: ');
readln(k,m,r);
for i:=1 to r do
begin
j:=k;
p:=a[j];
while j<m do
begin
a[j]:=a[j+1];
j:=j+1
end;
a[j]:=p;
end;
writeln('Измененный массив:');
for i:=1 to 10 do write(a[i],' ');
<span>end.</span>