Главная » 2013 Сентябрь 29 » Наибольший общий делитель двух натуральных чисел A и B (Pascal)
14:27 Наибольший общий делитель двух натуральных чисел A и B (Pascal) | |
| В одной из египетских пирамид на каменной
надгробной плите было обнаружено высеченное иероглифическое обозначение
числа 2520. Быть может, потому, что оно без остатка делится на все
натуральные числа от 1 до 10. Сначала осуществляется деление, а затем — умножение,чтобы уменьшить вероятность переполнения. uses crt; function NOD(a,b:longint):longint; begin repeat if a>b then a:=a mod b else b:=b mod a; | |
|
| |
| Всего комментариев: 0 | |