Задание

Определите количество различных значений n таких, что n и m – натуральные числа, находящиеся в диапазоне [100; 1000], а значение F(n, m) равно числу 30.

Паскаль

function F(n,m:

integer): integer;

begin

if m = 0 then

F:= n

else

F:= F(m, n mod m)

end;