Объявляем функцию gcd, принимающую два целочисленных параметра и возвращающую их наибольший общий делитель. Здесь это вычисляется при алгоритма Евклида.
Затем для удобства определяем ещё одну функцию gcd3, которая принимает уже три аргумента и, используя указанную в условии формулу и описанную выше функцию gcd, вычисляет НОД от трёх чисел.
В основной части программы просто три числа считываются с клавиатуры и выводится ответ.
Код (PascalABC.NET v3.6.2316):
function gcd(a, b: integer): integer;
begin
while a * b <> 0 do
(a, b) := (b, a mod b);
Result := a + b
end;
function gcd3(a, b, c: integer) := gcd(gcd(a, b), c);
Учитывая, что ток напряжением свыше 12 вольт в сырых местах и 36 вольт в сухом месте опасный для жизни человека, во избежание поражения электрическим током, необходимо соблюдать правила безопасности:
1. ни в коем случае нельзя прикасаться к электропроводам, рубильникам, корпусам электромоторов и других частей электрооборудования, поскольку они могут быть под напряжением; 2. не следует поднимать оборванные провода, упавшие и становиться на них ногами, потому что они могут быть под напряжением; 3. не надо включать и выключать електрорубильники; в тех случаях, когда грозит авария или несчастный случай с людьми, рубильник может быть отключен любым человеком при соблюдении правил личной безопасности; 4. выключать и включать рубильник на распределительных щитах разрешено только электромонтерам; 5. нельзя пользоваться переносной электролампой напряжением свыше 36 вольт; 6. запрещено вкручивания и выкручивания электрических ламп напряжением свыше 36 вольт по мере необходимости надо вызвать электромонтера.
7. Не работайте с электроприборами, если вы утомлены, — электрическое сопротивление такого организма понижено, внимание ослаблено, реакция замедленна.
8. Если проводка выполнена скрытым под штукатуркой, то во избежание несчастного случая запрещено самовольно забивать в стены гвозди и костыли для подвешивания различных предметов.
9. Поврежденные ламповые патроны, выключатели, штепсельные соединения и электропроводку опасно ремонтировать или заменять под напряжением. Необходимо обесточить соответствующий участок цепи (выкрутить пробки или отключить автомат).
10. ВАЖНО ЗНАТЬ что: Переменный ток частотой 50 Гц поражает человека больше, чем постоянный. Например, переменный ток такой частоты силой 5—7 мА вызывает судороги рук, а постоянный такой же силы — лишь легкое нагревание. Переменный ток силой 20—35 мА парализует руки внезапно, и если неизолированную токоведущую деталь человек взял пальцами, то руку от нее оторвать уже нельзя. Постоянный ток такой силы вызывает незначительное сокращение мышц. И переменный, и постоянный ток силой 80—100 мА приводит к параличу дыхания.
Объявляем функцию gcd, принимающую два целочисленных параметра и возвращающую их наибольший общий делитель. Здесь это вычисляется при алгоритма Евклида.
Затем для удобства определяем ещё одну функцию gcd3, которая принимает уже три аргумента и, используя указанную в условии формулу и описанную выше функцию gcd, вычисляет НОД от трёх чисел.
В основной части программы просто три числа считываются с клавиатуры и выводится ответ.
Код (PascalABC.NET v3.6.2316):
function gcd(a, b: integer): integer;
begin
while a * b <> 0 do
(a, b) := (b, a mod b);
Result := a + b
end;
function gcd3(a, b, c: integer) := gcd(gcd(a, b), c);
begin
var (a, b, c) := ReadInteger3;
print(gcd3(a, b, c))
end.
Пример ввода:
10 40 20
Пример вывода:
10
Учитывая, что ток напряжением свыше 12 вольт в сырых местах и 36 вольт в сухом месте опасный для жизни человека, во избежание поражения электрическим током, необходимо соблюдать правила безопасности:
1. ни в коем случае нельзя прикасаться к электропроводам, рубильникам, корпусам электромоторов и других частей электрооборудования, поскольку они могут быть под напряжением;
2. не следует поднимать оборванные провода, упавшие и становиться на них ногами, потому что они могут быть под напряжением;
3. не надо включать и выключать електрорубильники; в тех случаях, когда грозит авария или несчастный случай с людьми, рубильник может быть отключен любым человеком при соблюдении правил личной безопасности;
4. выключать и включать рубильник на распределительных щитах разрешено только электромонтерам;
5. нельзя пользоваться переносной электролампой напряжением свыше 36 вольт;
6. запрещено вкручивания и выкручивания электрических ламп напряжением свыше 36 вольт по мере необходимости надо вызвать электромонтера.
7. Не работайте с электроприборами, если вы утомлены, — электрическое сопротивление такого организма понижено, внимание ослаблено, реакция замедленна.
8. Если проводка выполнена скрытым под штукатуркой, то во избежание несчастного случая запрещено самовольно забивать в стены гвозди и костыли для подвешивания различных предметов.
9. Поврежденные ламповые патроны, выключатели, штепсельные соединения и электропроводку опасно ремонтировать или заменять под напряжением. Необходимо обесточить соответствующий участок цепи (выкрутить пробки или отключить автомат).
10. ВАЖНО ЗНАТЬ что: Переменный ток частотой 50 Гц поражает человека больше, чем постоянный. Например, переменный ток такой частоты силой 5—7 мА вызывает судороги рук, а постоянный такой же силы — лишь легкое нагревание. Переменный ток силой 20—35 мА парализует руки внезапно, и если неизолированную токоведущую деталь человек взял пальцами, то руку от нее оторвать уже нельзя. Постоянный ток такой силы вызывает незначительное сокращение мышц. И переменный, и постоянный ток силой 80—100 мА приводит к параличу дыхания.