Решить по информатике. условия дан массив вещественных чилех x(12) все его элементы уменьшить на 23. 2)дан массив целых чисел, все четные элементы заменить на их квадраты, а все не четные удвоить. 3)в массиве храниться информация о стоимости 1кг 20 видов конфет. определить, сколько стоят самые дешевые конфеты. 4)найти число пар "соседних" элементов массива, являющихся не четными числами. сразу говорю я 9 класс,и некоторые заумные операторы не обьясняли!

1) 

var x: array[12] of real;

i: integer;

 

begin

    for i: =1 to 12 do

    begin

      readln(x[i]);

      x[i]: =x[i]-23;

    end;

    for i: =1 to 12 do

      writeln(x[i])

end.

2)

var m: array[100] of integer;

i: integer;

begin

    for i: =1 to 100 do begin

      readln(m[i]);

        if(m[i] mod 2=0) then m[i]: =m[i]*m[i]

        else   m[i]=2*m[i];

    end;    

    for i: =1 to 100 do

      writeln(m[i]);

end.

3)

var price: array[20] of real;

i: integer;

minprice: real;

begin

    minprice: =10000;

    for i: =1 to 20 do

    begin

      readln(price[i]);

      if (price[i]< minprice) then minprice: =price[i];

    end;

    writeln(minprice)

end.

4) 

var m: array[100] of integer;

i, counter: integer;

begin

    readln(m[1]);

    counter: =0;

    for i: =2 to 100 do begin

      readln(m[i]);

      if ((m[i] mod 2=1) and (m[i-1] mod 2=1)) then inc(counter);

    end;

    writeln(counter)

end.

Ну например, когда старые устарели. возьмём для наглядности две программы: paint и adobe flash. оба графические редакторы. но paint по сравнению с adobe flash имеет маленький набор функций. поэтому в своё время создали аф, который обладал  намного большим функционалом и был  намного более высокотехнологичен. это не значит что аф полностью заменил пайнт, пайнт до сих пор есть на компьютерах под windows, его улучшают и дорабатывают, но тем не менее для профессиональной обработки изображений мы пользуемся af, ap и другими сходным софтом. поэтому новые программы : 1.когда устарели старые.                                                           2.когда появились новые технологии и их хотят внедрять в новых программах.                                                           3.когда хотят создать программу с более высоким функционалом чем у уже имеющихся.