Ате жазулары бар ұяшықтарды анықтау үшін шартты форматтауды қолдануға бола ма?

program nn;

uses crt;

var a: array [1..20] of real;

t: real;

i,n,min: integer;

begin

    {ввод последовательности, это самостоятельно}

    min : = 1;

    for i : = 1 to 20 do

    begin

          if  a[i] < a[min] then

                min : = i;

    end;

    t : = a[min];

    a[min] : = a[20-n];

    a[20-n] : = t;

end.

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

var x1, x2, x3, y1, y2, y3, p: real;

function len(x1, y1, x2, y2: real): real; begin len : = sqrt(sqr(x2 - x1) + sqr(y2 - y1)); end;

begin readln(x1, y1, x2, y2, x3, y3); p : = len(x1, y1, x2, y2) + len(x1, y1, x3, y3) + len(x2, y2, x3, y3); writeln(p: 8: 3); end.

1) чтобы получить 4 литра нужно из девятилитрового ведра перелить воду в пятилитровое ведро. т.к. в пятилитровое ведро вместится только 5 литров, то в девятилитровом останется 4 литра.

2)  чтобы получить 1 литр нужно из девятилитрового ведра перелить воду в пятилитровое ведро. т.к. в пятилитровое ведро вместится только 5 литров, то в девятилитровом останется 4 литра. теперь нужно из девятилитрового ведра, в котором сейчас 4 литра, перелить воду в трёхлитровое ведро. т. к. в трёхлитровое ведро вместится только 3 литра, то в девятилитровом будет 1литр. в пятилитровом так и останется 5 литров.