Viktor1316
?>

Составьте программу определения наибольшего общего делителя двух натуральных чисел. на абс паскале надо

Информатика

Ответы

sttig
Var a,b,NOD:integer;
begin
write('a='); readln(a);
write('b='); readln(b);
while (a<>0)and(b<>0) do
 if a>b then a:=a mod b else b:=b mod a;
NOD:=a+b;
writeln('НОД=',NOD);
end.

Пример:
a=75
b=125
НОД=25
azarovaelena19812

from random import randint

# Создание списка,

# его сортировка по возрастанию

# и вывод на экран

a = []

for i in range(10):

   a.append(randint(1, 50))

a.sort()

print(a)

# искомое число

value = int(input())

mid = len(a) // 2

low = 0

high = len(a) - 1

while a[mid] != value and low <= high:

   if value > a[mid]:

       low = mid + 1

   else:

       high = mid - 1

   mid = (low + high) // 2

if low > high:

   print("Такого значения нет")

else:

   if (mid == 0 and a[1] != a[0]) or (mid == len(a) - 1 and a[mid - 1] != a[mid]):

       print(1)

   else:

       q = 0

       for i in range(mid, len(a)):

           if a[i] == a[mid]:

               q += 1

           else:

               break

       for i in range(mid - 1, 0, -1):

           if a[i] == a[mid]:

               q += 1

           else:

               break

       print(q)

Чтобы убрать вывод массива просто на 10-й строке убери print(a), а для  вывода неотсортированного массива вставь после 8-й строки.

alenaya69918

К примеру возьмём нарушение правил дорожного движения и пользования легко воспламеняющимися предметами.

Объяснение:

Если мы нарушим хотябы одно правило дорожного движения ничего доброго не случиться, все эти правила придуманы для нашей безопасности, поэтому, если мы будем переходить слишком часто дорогу на красный, не пропускать спец. службы, перебегать дорогу, превышать скорость и не читать знаки, если вы водитель, это все плохо закончится.

Если оставлять например дезодорант, или быллоны с газом где-нибудь около огня может произойти взрыв, или пожар. Также нужно быть осторожным с другими жидкостями со значком "Осторожно, воспламеняется!" От нарушения всех правил безопасности может быть плохо всем окружающим. Поэтому, если не хотите дойти до летального исхода читайте правила пользования!

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Составьте программу определения наибольшего общего делителя двух натуральных чисел. на абс паскале надо
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

АнатольевичМиронова885
mereninka7008
beast05031075
Леонтьева
Serafim
ksuhova
Руслан Руденко1262
Vladimirovich1898
info2990
proh-dorohova5244
palchiknr
garikman-flesh486
sergeykvik13
kapriz1999
Yurevna-Anatolevna