Условие задания:

1 Б.
Заголовок процедуры вычисления наибольшего общего делителя может быть описан так:
 
procedure nod (a,b:integer; var c:integer);
  
Вариант вызова процедуры:
nod (30,19,z)