Největší společný dělitel n čísel – Pascal – Fórum – Programujte.com

Ahoj, prosím potřeboval bych pomoct, mám tento úkol:

Sestavte algoritmus pro nalezeni nejvetsiho spolecneho delitele n celych cisel.
V algoritmu vyuzijte funkce NSD pro vyhledani nejvetsiho spolecneho deliitele dvou cisel x a y.

Mně se podařilo pouze odladit NSD pro dvě čísla a nevím, jak tam zakomponovat to, aby bral n čísel.

Za rady děkuji

PS: Ten program na NSD dvou čísel je níže:

procedure NSD;

... //deklaraci proměnných a jejich zadání není podstatné sem dávat

while i <> j do

if i >j then i := i - j

else j := j - i

Možná by stálo za pokus použít hrubou sílu a spočítat NSD každého s každým a zapamatovat si ten nejmenší. Jestli tam budou nějaká nesoudělná čísla, NSD ti spadne na 1 (to pak můžeš rovnou skončit).