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

Си Описать функцию Count(int N, int L, int R), определяющую сколько в записи натурального числа N цифр меньше чем R и больше чем L. Используя эту функцию решить следующую задачу. Даны натуральное M и последовательность из M натуральных чисел. Определить максимальное из чисел, у которых количество цифр от двух до семи есть четная величина

👇
Ответ:
Сафина3651
Сафина3651
10.06.2022

unsigned __int64 count; unsigned __int64 Combin1(unsigned int n, unsigned int k) { count++; if (k == 0 || k == n) return 1; ...

4,7(89 оценок)
Ответ:
ЛюБИмИЦа55
ЛюБИмИЦа55
10.06.2022
Сейчас 5 мин уде пишу на листке
4,4(63 оценок)
Открыть все ответы
Ответ:
class4v2016
class4v2016
10.06.2022
// PascalABC.NET 3.3, сборка 1611 от 06.01.2018
// Внимание! Если программа не работает, обновите версию!

begin
  var (a,b,c):=ReadReal3('Введите три числа:');
  if b.Between(a,c) then (a,b,c):=(2*a,2*b,2*c);
  if (a<0) or (b<0) or (c<0) then (a,b,c):=(Abs(a),Abs(b),Abs(c));
  Writeln('a=',a,', b=',b,', c=',c)
end.

Пример
Введите три числа: 3.6 -5.2 8
a=3.6, b=5.2, c=8

Первый оператор читает с клавиатуры три вещественных числа и помещает их в переменные a,b,c.
Второй оператор проверяет, находится ли второе число (b) между остальными двумя (может и совпадать с одним из них). Если да, то значение каждой переменной удваивается.
Третий оператор проверяет, есть ли среди введенных чисел хоть одно отрицательное. Если есть, значения заменяются их модулями (становятся положительными).
И в конце следует вывод результатов.
4,6(69 оценок)
Ответ:
malinovaya14
malinovaya14
10.06.2022
Смотрите. Тут правда есть немного лишнего.  Противоположные стороны всё таки проверять не надо. Хватит 4х углов. Но текст комментирован, лишнее можно убрать.  поясняющих картинок нет. но вопрос и так слишком долго живёт без ответа. Мне казалось срок жизни 2-3 дня максимум, а тут 5 дней минуло.
Если что, отправляйте на исправление. дома дорисую.
Главное программа работает. Правда есть подозрения, что не во всех Паскалях (как они относятся к объявлению массива массивов?)
Это был Free Pascal Compiler version 2.6.4 [2014/04/20] for i386
В версии 3.0.0. думаю, тоже сработает

P.S.Добавил возможные варианты (не все, ясное дело) расположения точек.

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