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

ребят!
Хотя бы первые 2 задания


ребят! Хотя бы первые 2 задания

👇
Открыть все ответы
Ответ:
Ppoligoon
Ppoligoon
05.02.2021
Василий
Из условия задачи знаем, что он выбрал желтую "флэшку".
Он выбрал "флэшку", которая больше "флэшки" Пети. Значит, учитывая, что Егор купил "флэшку" на 16 Гб(см. объяснение ниже), то Василий мог купить устройство объемом 4 и 8 Гб. 8>4 => Василий купил гаджет размером 8 Гб.
Следовательно, Василий купил желтую "флэшку" на 8 Гб.

Егор
Знаем, что ему не понравилась "флэшка" красного цвета, значит, он выбрал либо зеленую, либо желтую. Но в условии сказано, что желтую "флэшку"купил Василий, значит, Егор купил "флэшку" зеленого цвета.

Из условия следует, что Егор купил "флэшку" размером, равную "флэшкам" Пети и Василия вместе взятых. Знаем, что у "флэшек" следующие размеры: 4 Гб, 8 Гб, 16 Гб. Предположим, Егор купил гаджет размером 4 Гб, тогда должно быть справедливо следующее: 4>8+16; 4>24. Однако, это неверно, значит, Егор не покупал "флэшку" на 4 Гб. Предположим, что размер устройства был 8 Гб => 8>4+16; 8>20. Это тоже не верно. Значит, Егор купил "флэшку" на 16 Гб. Проверим: 16>4+8; 16>12.
Следовательно, Егор купил зеленую "флэшку" на 16 ГБ.

Петя
Методом исключения понимаем, что Петя купил красную "флэшку". Методом исключения, Петя купил "флэшку" на 4 Гб.
Получаем, что Петя купил красную "флэшку" на 4 Гб.

Подходит 3 вариант из ответов.
4,4(78 оценок)
Ответ:
Hamrod
Hamrod
05.02.2021
1. В приведенном коде ошибка. Не хватает ";" в третьей строке снизу.
2. Немного изменим ваш код и получим искомое значение x
Искомое число х = 16293

var
  x, y, a, b, k: integer;

begin
  k:=10000;
  repeat
    x:=k;
    a := 0; b := 0; y := 1;
    while x > 0 do
    begin
      if (x mod 10) mod 2 = 0
        then
        a := a * 10 + x mod 10
      else begin
        y := y * 10;
        b := b * 10 + x mod 10
      end;
      x := x div 10
    end;
    a := a * y + b;
    k := k + 1;
    until a = 26391;
    writeln(a:8, k-1:8); 
end.

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