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

program fantscrin;

    const n = 10;

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

        b: array [1..n] of integer;

        max_a,max_b,i,k: integer;

begin

    for i: =1 to n do

        a[i]: =random(20);

    for i: =1 to n do

        b[i]: =random(20);

    for i: =1 to n do

        write(a[i], '   ');

    writeln('');

    for i: =1 to n do

        write(b[i], '   ');

    max_a: =1;

    for i: =2 to n do

        if(a[i]> a[max_a]) then max_a: =i;

    max_b: =1;

    for i: =2 to n do

        if(b[i]> b[max_b]) then max_b: =i;

    writeln('');

    writeln('max_a = ',max_a);

    writeln('max_b = ',max_b);

    k: =a[max_a];

    a[max_a]: =b[max_b];

    b[max_b]: =k;

    for i: =1 to n do

        write(a[i], '   ');

    writeln('');

    for i: =1 to n do

        write(b[i], '   ');

end.