Дан фрагмент программы if x>0 then if y <>x then write да

program gh;

    var a: array[ 1..10] of integer;

                i: integer;

begin

  for i: =1 to 10 do

        begin

              a[i] : = random(20) + 20;

              write(a[i]);

        end;

end.

пломп лпмб_лпмплпмб й об лпмбц_лпмплпмб

(около кола _колокола и на колах _колокола)

сумма=18

семерки нету

или тебе программу написать?

5`120`000 бит =  640 000 байт = 625 кб