Дана последовательность действительных чисел a1 ≤ a2 ≤ ... ≤ аn. Вставить действительное число b в нее так, чтобы последовательность (программа Паскаль)

program massiv3_11;
uses crt;
var
  a:array [1..100] of integer;
i,n,m,b:integer;
begin
clrscr;
repeat
write ('Vvedite kol-vo elementov massiva (ne bolee 100): ');
readln (n);
until (n>0) and (n<=100);
 for i:=1 to n do
  begin
   write ('Vvedite a[',i,']: ');
   readln (a[i]);
  end;
 write ('Vvedite chislo b: ');
 readln (b);
 i:=1;
 while b>=a[i] do
  begin
   m:=i;
   i:=i+1;
  end;
 for i:=n+1 downto 1 do
  begin
   a[i]:=a[i-1];
   a[m]:=b;
  end;
 for i:=1 to n+1 do writeln (a[i]);
 readln;
end.

var a: array [0..n] of real;
i,k: integer;
b: real;
begin
writeln ('введите число эл-ов массива');
readln (n);
writeln ('введите массив формата a1<=a2<=...<=an');
for i:=0 to n-1 do readln a[i];
writeln ('введите число b');
readln (b);
k:=0;
while (k>n) and (a[k]>=b) do k:=k+1;
for i:=n downto k+1 do a[i]:=a[i-1];
a[k]:=b;
for i:=0 to n do writeln (a[i]);
readln;
end.

ответ:   составила по три предложения. можете выбрать один из них. ответ не из интернета.

Можете доверять ответу.

Удачи вам ^_^

1.Men Azamat bilan maktabga birga boraman.

2.Kecha dadam bilan sayrga chiqdik.

3. Do'stim bilan futbol o'ynagani chiqdim.

1.Akam(opam) mendan katta bo'lgani uchun ularni hurmat qilaman.

2. Bugun tug'ilgan kunim bo'lgani uchun opam menga sovg'a berdilar.

3. Akam mendan katta bo'lganlari uchun matematikani yahshi biladilar.

1. Men kitob orqali ko'p narsalarni o'rganaman.

2. Men o'rtog'im bilan telefon orqali suhbatlashdim.

3. Amudaryo Termiz shahri orqali o'tadi.

1. Men akam kabi a'lo bahoga o'qimoqchiman.

2. Kelajakda dadam kabi ishbilarmon bo'laman.

3. Men ustozim kabi o'qituvchi bo'lmoqchiman.

Объяснение сделайте как "лучший ответ"

Почему многие спортсмены предпочитают тренироваться в высокогорьях и за границей?

Спорт–это здоровая жизнь. И все мы это знаем. Одни люди занимаются им для поддержания здоровья, а другие связывают со спортом свою жизнь. Спортсмены занимаются спортом в высокогорьях, потому что им нужно развивать свой организм при низком и высоком давлении. Также в высокогорьях чистый воздух.

Люди, профессионально занимающиеся спортом, показывают свой опыт и свои умения за границей для того, чтобы показать людям, вдохновить их на то, что заниматься спортом–это полезно. Также, спортсмены соревнуются в других странах потому что они хотят своей стране стать ещё более культурной.