Спрайт задаёт вопрос как ваше имя.? что нужно написать

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.

Розрядність - це кількість біт інформації, які процесор прийме і обробить через свої регістри за один такт. тактова частота -  це кількість тактів (операцій) процесора в секунду. поколiння - це  перша цифра в маркуванні процесора. форм-фактор -  це стандарт, який визначає габаритні розміри технічного виробу,  а також описує додаткові сукупністю його технічних параметрів. фірма-виробник - це  назва фірми, яка виготовляє процесор. модифiкацiя -  це змінена яким-небудь чином модель процесора. кількість ядер мікропроцесора  -  ця  характеристика впливає на ість системи.