Помогите срочно

Задание:Наберите приведенную программу и протестируйте для различных чисел. Используя подпрограмму нахождения НОД двух чисел А и В, найти НОД трех чисел А, В,С по формулам: К1 = НОД ( А, В ); К = НОД ( К1, С );