М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
punchplz
punchplz
14.02.2021 10:48 •  Информатика

Доказать что наименьшее общее кратное это примитивно рекурсивная функция

👇
Открыть все ответы
Ответ:
lina09270
lina09270
14.02.2021
Трехзначное число, записанное с цифр a,b,c имеет величину
100a+10b+c.
Если зачеркнуть (отбросить) старшую цифру, то получится число 10b+c.
Умножая на 6, получаем 6(10b+c)=60b+6c.
И теперь можно составить уравнение
100a+10b+c=60b+6c
100a=50b+5c
100a=5(10b+c)
20a=10b+c
a=(10b+c)/20  (1)
Рассмотрим соотношения между целочисленными a,b,c
( a ∈ [1;9], b,c ∈ [0;9] ), которые удовлетворяют уравнению (1).
Поскольку 10b кратно 10, то сумма 10b+с может оканчиваться нулем только если с=0.
Тогда (1) принимает вид a=10b/20 или a=b/2
Тогда b - четное, т.е. принимает значения 2, 4, 6, 8.
Соответственно, a принимает значения 1, 2, 3, 4.

Теперь можно записать варианты чисел: 120, 240, 360, 480.
4,7(19 оценок)
Ответ:
султа65
султа65
14.02.2021
Не уверена, что по длине сторон можно определить, что треугольник остроугольный, но предположила, что здесь можно использовать т. Пифагора, т.е. если квадрат гипотенузы (большей стороны) окажется меньше суммы квадратов катетов (меньших сторон), то соответственно и угол между последними окажется меньше 90 градусов. Если я не права отметьте ошибкой, пусть удалят. 
Итак:

program aaa;
var a,b,c,x,y,z,s,p: real; 
begin
writeln ('Введите стороны треугольника A, B и C');
readln (a,b,c);

  {сначала найдем меньшую, среднюю и большую сторону
  и присвоим их значения, соответственно, переменным x, y и z}

 
    if a<b
     then
      if a<c
        then 
          if b<c
            then begin x:=a; y:=b; z:=c end
            else begin x:=a; y:=c; z:=b end
         else begin x:=c; y:=a; z:=b end 
      else
        if a>c
          then 
            if b<c
              then begin x:=b; y:=c; z:=a end 
              else begin x:=c; y:=b; z:=a end 
          else begin x:=b; y:=a; z:=c end; 
    
    {Теперь узнаем, является ли треугольник разносторонним и остроугольным:
    Для этого сравним длины сторон между собой а также сумму квадратов меньших сторон с квадратом большей}
          
 if ((x*x+y*y)>(z*z)) and (a<>b) and (a<>c) and (b<>c)
  then begin  
    p:=(a+b+c)/2;   // находим полупериметр
    s:=sqrt(p*(p-a)*(p-b)*(p-c));   // находим площадь треугольника
    writeln(x,'  ',y,'  ',z,'   - могут быть сторонами остроугольного разностороннего треугольника');
    writeln('Площадь этого треугольника = ',s)
    end
  else
    writeln(a:4,b:4,c:4,' - не могут быть сторонами остроугольного разностороннего треугольника')
end.
4,7(28 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ