Текст подпрограммы и версий
pa11i_c.zip  		Тексты тестовых примеров
tpa11i_c.zip 

Функция:  pa11i_c

Назначение

Вычисление общего наибольшего делителя двух целых чисел.

Математическое описание

Подпрограмма - функция pa11i_c, имеющая целый тип, использует алгоритм Евклида для вычисления общего наибольшего делителя двух целых чисел M и N, которые могут быть заданы как отрицательными, так и положительными.

Использование 

    integer pa11i_c(integer *m, integer *n)

   Параметры
     m, n - заданные значения целых чисел, для которых ищется общий наибольший делитель (тип: целый). 
   Версии:  нет 
   Вызываемые подпрограммы:  нет 
   Замечания по использованию:  нет

Пример использования 

int main(void)
{
    /* Local variables */
    extern int pa11i_c(int *, int *);
    static int l;

    l = pa11i_c(&c__252, &c__441);

    printf("\n %5i \n", l);
    return 0;
} /* main */


Результат:   l = 63