Сторона, принимающая информацию. ( 2 слова)

Сторона, принимающая информацию, называется приемником информации.

Var   a: array[1..4] of integer;   i,j,r,p: integer; function hod(c,b: integer): integer;   begin   while c< > b do     if c> b       then         c: =c-b     else       b: =b-c;   hod: =c;   end; function hok(c,b, rr: integer): integer;   begin   if ((c mod b=0) or (b mod c=0)) and ((c div b > 1) or (b div c > 1))     then       begin         if c> b             then             hok: =c           else           hok: =b;       end     else       hok: =(c*b)  div  rr;   end; begin   a[1]: =36;   a[2]: =54;   a[3]: =18;   a[4]: =15;   p: =1;   r: =hod(a[1],a[2]);   p: =hok(a[1], a[2], r);   for i: =3 to 4 do   begin     r: =hod(r, a[i]);     p: =hok(p, a[i],r);   end;   writeln('hok = ',p); end.

#include < stdio.h> #include < string.h> #include < iostream> void main() {       int a[10];       for (int i = 0; i < 10; ++i) {             a[i] = rand() % 150;             if (a[i] > 50) {                   printf("%d\n", a[i]);             }       }       getchar(); }