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

Pascal abc.
1. дано вещественное. наити среднее арифметическое чисел, целой и дробной части.
2. вычислить значение аргумента если x> 0, x: =sqr(x), в противном случае x: =(12+x) /5.

👇
Ответ:
ivan497
ivan497
04.06.2022

ответ: хз если честно

объяснение:

4,6(75 оценок)
Открыть все ответы
Ответ:
zarizatamara00
zarizatamara00
04.06.2022
Var a1, b1, c1, a2, b2, c2, p1, p2, s1, s2: real;
begin
  writeln('Введите строны первого треугольника: ');
  read(a1, b1, c1);
  writeln('Введите стороны второго треугольника: ');
  read(a2, b2, c2);
  p1 := (a1 + b1 + c1) / 2;
  p2 := (a2 + b2 + c2) / 2;
  s1 := sqrt(p1 * (p1 - a1) * (p1 - b1) * (p1 - c1));
  s2 := sqrt(p2 * (p2 - a2) * (p2 - b2) * (p2 - c2));
  if (s1 + 1e-3 > s2) and (s1 < s2 + 1e-3) then writeln('Равновеликие')
                                           else writeln('Неравновеликие');
end.
4,6(100 оценок)
Ответ:
rano124
rano124
04.06.2022

2018

Сообщений: 27

15.03.2019, 18:38 3

Лучший ответ Сообщение было отмечено CyberNinjaProg как решение

Решение

Я бы мог тебе написать готовый код, но для начала просто алгоритм объясню.

Во первых, симметричность такой последовательности разобъём на 2 типа - чётная и нечётная.

Чётная последовательность делиться на две одинаковые отражённые горизонтально части. Например, "12122121".

Нечётная делиться таким же образом, только посередине есть цифра не имеющая пары. Например, "123454321".

Соответственно нам надо проверить входную последовательность на возможность создать наикратчайшую симметричную последовательность одного из двух типов.

Конкретный алгоритм следующий:

//Для чётно-симметричной последовательности

Берём половину входной последовательности (если её длина нечётная, берём с округлением в большую сторону), и начинаем по одному её элементу, от последнего и до первого, сравнивать их с элементами второй половины, но только взятых в порядке слева-направо.

То-есть, от последовательности 12122, берём 121, и сравниваем с 22: i[2] == i[3] (1 == 2).

Сравниваем так до тех пор, пока последовательность не закончиться. Тогда, оставшаяся несрАвненной последовательность цифр взятой в порядке справа налево и будет ответом (вместе с количеством этих цифр).

Если же при сравнении, цифры оказались разными, начинаем всё сначала, только с цифры на одну правее.

То-есть теперь берём уже не 121, а 1212, и делаем всё предыдущее снова. Если последовательность закончилась, то есть если мы например взяли уже 12345 от 12345, то сравнивать уже ничего не нужно, надо просто взять всю последовательность в обратном порядке - "1234554321".

//Для нечётно-симметричной последовательности

Делаем всё то же самое, что и для чётно-симметричной последовательности, только начинаем сравнивать не с цифры, следующей той, у которой мы разделили, а через одну.

То-есть, для входной последовательности 12345, берём 123 и начинаем сравнивать цифру 3 с цифрой 5, а не с цифрой 4.

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

//Итог

Для того, чтобы найти правильный ответ, надо найти и чётную, и нечётную последовательности. Затем сравнить длину обоих ответов. Кратчайший ответ будет верным.

4,4(59 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ Оформи подписку
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ