Решение задачи Array 114

#include <stdio.h>
int main(void)
{
    int a[20];
    int temp;
    int n;
    printf("N: ");
    scanf("%i",&n);
 
    int i;
    for (i=0; i<n; ++i){         printf("a[%i] : ",i+1);         scanf("%i",&a[i]);     }       if (a[0]>a[1]){
        temp=a[0];
        a[0] =a[1];
        a[1] =temp;
    }
    int i2,i3;
 
    for (i=2; i<=n-1; ++i){         temp=a[i];         for (i2=i-1;i2>=0;--i2)
            if (temp<a[i2]) a[i2+1]=a[i2];
            else {
                    break;
            }
        a[i2+1]=temp;
        for (i3=0; i3<n;++i3) printf("  %i: %i\n",i3+1,a[i3]);
        printf("\n");
    }
 
    return 0;
}

import random

N = random.randrange(2,10)
#N = 3
#a = [N-i for i in range(N)]
a = [random.randrange(1,7) for i in range(N)]
#a = [3, 4, 2]
print("N = ", N)
print("Initial Array:")
print(a)

for i in range(1,N) :
    flag = False
    x = a[i]
    k = i - 1
    while k >= 0 :
        if x >= a[k] :
            break
        else :
            a[k+1] = a[k]
            flag = True
        k -= 1
    if flag and k >= -1:
        a[k+1] = x
        
    print("Step ",i)
    print(a)
    print()
        
#    elif 
print("Modified Array:")
print(a)
									

program Array114;
var
a : array [0..6] of real;
N,i,i2,i3: integer;
 
begin
 Write('N: ');
 Readln(N);
 
 Writeln('A: ');
 for i:=1 to N do
  begin
   write(i,' :');
   readln(a[i]);
  end;
 
  if a[1] > a[2] then
   begin
    a[1]:=a[1]+a[2];
    a[2]:=a[1]-a[2];
    a[1]:=a[1]-a[2];
   end;
 
  for i:=3 to N do
   begin
    a[0]:=a[i];
    for i2:=i-1 downto 0 do
     if a[0]<a[i2] then a[i2+1]:=a[i2]
     else
      begin
       a[i2+1]:=a[0];
       break;
      end;
    for i3:=1 to N do writeln(i3,':',a[i3]:7:0);
    writeln;
   end;
 end.