Spis treœci - Patrz

M = ?; {liczba odbiorców}K = ?; {liczba łączy}process INICJATOR;var k: integer;beginfor k := 1 to K doOUTPUT('lacze',k)end;process NADAWCA(i:l..N);var k,j: integer;beginwhile true do beginINPUT('lacze', k:integer);losuj(j);OUTPUT('dzwoni', k, j);INPUT('odbior', k, j);nadaj(k);OUTPUT('lacze', k)endend;process ODBIORCA(i:l..M);var k: integer;beginwhile true do beginINPUT('dzwoni', k:integer, i);OUTPUT('odbior', k, i);odbierz(k)endend;7.4.6 Mnożenie wielomianówProces UŻYTKOWNIK wysyła w przestrzeń współczynniki mnożonych wielomianów,po jednej krotce ('iloczyn') na każcly iloczyn do obliczenia oraz numery przekątnych, wzdłużktórych mają, przebiegać obliczenia. Każdy proces P próbuje wczytać na początku krotkę,^loczynowa". Jeśli mu się to nie uda, kończy działanie, bo wszystkie iloczyny zostały jużpoliczone. W przeciwnym razie próbuje rozpocząć obliczenia na nowej przekątnej lubkontynuować już rozpoczęte. Współczynniki wielomianów są odczytywane z przestrzenioperacją READ, bo mogą być jeszcze potrzebne dla obliczenia innych iloczynów, sumyczęściowe zaś pobiera się operacją INPUT.const N = ?;{stopień mnożonychwielomianów}process UŻYTKOWNIK;var a,b: array[O..N} of real; {mnożone wielomiany}i,j: integer; x: real;c: array[0..2*N] of real; {wielomian wynikowy}begin{ustalenie wartościa[0. .N] i b[0. .N]}for i := 0 to N do beginOUTPUT('a', i, a[i]); {wysłanie ich w przestrzeń}OUTPUT('b', i, b[i])end;for i := -N to N do199