Объявляем функцию 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
1. А) Шахматы | теннис
2.
1) https://ps.1sept.ru/ - сайт газеты для учителя «Первое сентября»
2) https://www.admrebr.ru/ - новый сайт администрации Ребрихинского района
3) https://hermitagemuseum.org/wps/portal/hermitage/?lng=ru - официальный сайт Государственного эрмитажа
Объяснение:
1.
Чем больше ИЛИ (|) тем больше страниц будет найдено.
Чем больше И (&) тем меньше страниц будет найдено.
На кругах Эйлера в варианте А будут закрашены оба круга, в варианте Б только один из кругов, в варианте С только место, где два круга пересекаются.
2. Просто вбиваем что нужно найти в любой поисковик.