pascal 9999

название:

uri-имя*:

заголовок окна:

ЯП:

задача:

код (Esc - предпросмотр)

описание:

автор:

email:

пароль(изменить):

[для последующего редактирования]

подписаться на комментарии**

*	можно кириллицей (недопустимые символы:?&+=\/%#)
**	только для зарегистрированных пользователей

Задача: Наибольший общий делитель
Исходник: 9999, язык: pascal [code #593, hits: 8638]
аноним: 6y76 [добавлен: 26.07.2009]

repeat
a=a div b;
b=b div a;
until a=b;

repeat
a=a div b;
b=b div a;
until a=b;

fff