Паскаль. Вычисляет НОД для любого кол-ва чисел
Объяснение:
function Nod(a,b:integer):integer;{определение НОД двух чисел}
begin
while a<>b do
if a>b then a:=a-b else b:=b-a;
Nod:=a;
end;
var
a: array of integer;
n, i: integer;
k: integer;
begin
WriteLn('*** Определение НОД нескольких чисел ***');
Write('Введите кол-во чисел N = '); ReadLn(n);
SetLength(a, n + 1);
WriteLn('Введите числа: ');
for i := 1 to n do
begin
Write(i,'-e число: '); ReadLn(a[i]);
end;
WriteLn;
k := Nod(a[1], a[2]);
for i := 3 to n do k := nod(k, a[i]);
WriteLn('Общий НОД всех чисел = ', k);
end.
#1
a = [1, 1, 2, 3, 5, 8, 13, 21, 34, 55, 89].
for i in a:
if a < 5:
print(a)
#2
def f(a, b): #функция для сливания двух списков
ab = a + b
ab.sort()
return list(dict.fromkeys(ab))
#3
dict_a = {1:10, 2:20}
dict_b = {3:30, 4:40}
dict_c = {5:50, 6:60}
def update(a, b, c):
a.update(b)
a.update(c)
update(dict_a, dict_b, dict_c)
#4
array = list(map(int, input().split(",")))
cortex = tuple(array)
#5
array = [] #здесь твой данный список
print(array[0], array[len(array) - 1])
#6
def f(filename):
try:
return filename[filename.index(".") + 1:]
except:
return "Unknown file type"
#7
n = int(input())
print(n + n ** 2 + n ** 3)
#8
x = list(input())
f = list(input())
print(sorted(set(f) - set(x)))
#9
num = int(input())
print(sum(list(map(int, str(num
#10
string = str(input())
print(string.count('a'))