DECLARE FUNCTION NOD& (N1&, N2&) PRINT "Введите 2 натуральных числа, разделяя их запятой" INPUT "", M&, N& PRINT "Их наибольший общий делитель равен "; NOD&(M&, N&) END FUNCTION NOD& (N1&, N2&) IF N1& = 0 THEN NOD& = N2& ELSE NOD& = NOD&(N2& MOD N1&, N1&) END IF END FUNCTION