В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
danilohca
danilohca
10.01.2020 03:50 •  Информатика

У клітинці E3 знаходиться формула:=$B$3+C4. Запишіть, який вигляд матиме ця формула, якщо її скопіювати у клітинку:
а) E7;
в) С3;
д) К15;
€) C3;
б) E7;
г) E11;
e) T34;
ж) А2.

Показать ответ
Ответ:
Killeris
Killeris
18.01.2022 07:24

a = list(map(int, input().split())) ##Вводим все 4 числа в одну строку через пробел

if len(a) != len(set(a)):

raise ValueError('Числа введены не верно(повторяются)')

z = (a[0]%a[1]==0) and (a[0]%a[2]==0) and (a[0]%a[3]==0)

b = (a[0]%a[1]==0) or (a[0]%a[2]==0) or (a[0]%a[3]==0)

if z: print('Первое число делится без остатка на все введенные числа')

elif b: print('Первое число делится без остатка на одно или два из введенных чисел')

else: print('Первое число не делится без остатка ни на одно из введенных чисел')

Объяснение:

0,0(0 оценок)
Ответ:
samgrachev
samgrachev
08.01.2023 14:21
Procedure WriteDMS(r: real);
var
  dd, s: real;
  d, m: integer;

begin
  dd := 180 * r / Pi;
  d := Trunc(dd);
  dd := 60 * (dd - d);
  m := Trunc(dd);
  s := 60 * (dd - m);
  Writeln('=', d, ' град ', m, ' мин ', s:0:2, ' сек')
end;

var
  a, b, c, dd: real;

begin
  Write('Введите через пробел стороны треугольника a,b,c: ');
  Readln(a, b, c);
  Writeln('Значения углов треугольника');
  Write('А');
  dd := ArcCos((sqr(b) + sqr(c) - sqr(a)) / (2 * b * c));
  WriteDMS(dd);
  Write('B');
  dd := ArcCos((sqr(a) + sqr(c) - sqr(b)) / (2 * a * c));
  WriteDMS(dd);
  Write('C');
  dd := ArcCos((sqr(a) + sqr(b) - sqr(c)) / (2 * a * b));
  WriteDMS(dd);
end.

Тестовое решение:
Введите через пробел стороны треугольника a,b,c: 5.8 3.2 4.9
Значения углов треугольника
А=88 град 53 мин 7.58 сек
B=33 град 28 мин 41.54 сек
C=57 град 38 мин 10.88 сек
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота