Необходимо определить наибольший общий делитель двух введённых чисел. используя процедуру(два параметра-значения. один параметр-переменная.)

Т.к. язык не указан, написал на паскале. 
На сколько я понял, это должно выглядеть как-то так: 
https://pastebin.com/puua5grq