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

1)логическими переменными a, b, c, d, e обозначены следующие простые высказывания: a – яблоко красное, b – яблоко вкусное, c – яблоко сладкое, d – яблоко крупное, e – яблоко твердое. записать формулой сложное высказывание: "яблоко вкусное, хотя зеленое, но и не кислое".2) логическими переменными a, b, c, d, e обозначены следующие простые высказывания: a – яблоко красное, b – яблоко вкусное, c – яблоко сладкое, d – яблоко крупное, e – яблоко твердое. записать формулой сложное высказывание: "красный цвет яблока необходим и для того, чтобы оно было вкусное и одновременно мягкое" 3)логическими переменными a, b, c, d, e обозначены следующие простые высказывания: a – яблоко красное, b – яблоко вкусное, c – яблоко сладкое, d – яблоко крупное, e – яблоко твердое. записать формулой сложное высказывание: "яблоко вкусное, хотя зеленое, но и не кислое" 4)логическими переменными a, b, c, d, e обозначены следующие простые высказывания: a – яблоко красное, b – яблоко вкусное, c – яблоко сладкое, d – яблоко крупное, e – яблоко твердое. записать формулой сложное высказывание: "неверно, что если яблоко зеленое, то оно или твердое или кислое"

👇
Открыть все ответы
Ответ:
Hеll
Hеll
28.09.2020
Если панель инструментов "рисование" или "текстовые эффекты" не видна, перейдите в меню по пути вид – панели инструментов для активации панели инструментов. на панели инструментов рисование или текстовые эффекты щёлкните значок галерея текстовых эффектов. значокв диалоговом окне галерея текстовых эффектов выберите стиль текстового эффекта и нажмите кнопку "ок". объект текстового эффекта вставляется в документ. объекты текстовых эффектов являются пользовательскими фигурами. с панели инструментов "параметры трёхмерного изображения" можно в любой момент перейти от двумерного просмотра к трёхмерному и обратно. дважды щёлкните объект, чтобы перейти в режим редактирования текста. замените стандартный текст эффекта своим. чтобы выйти из режима редактирования текста, нажмите клавишу esc.
4,8(66 оценок)
Ответ:
сонька177
сонька177
28.09.2020
Var m : array[0..6] of Integer;
  i,k,N : Integer;
Begin
  For i:=0 to 6 do m[i]:=0;
  Readln(N);
  k:=6;
  While N>0 do
  Begin
    If N>=Power(2,k) then
    Begin
      N:=N-Trunc(Power(2,k));
      Inc(m[k]);
    end else Dec(k);
  end;
  For i:=0 to 6 do Writeln(Power(2,i),'  ',m[i],' шт.');
end.

Еще вариант:
Const
  NN = 7;
  money : array[1..7] of Integer = (1,2,4,8,16,32,64);
Var m : array[1..NN] of Integer;
  i,k,N : Integer;
Begin
  For i:=1 to NN do m[i]:=0;
  Readln(N);
  k:=NN;
  While N>0 do
  Begin
    If N>=money[k] then
    Begin
      N:=N-money[k];
      Inc(m[k]);
    end else Dec(k);
  end;
  For i:=1 to NN do Writeln(money[i],'  ',m[i],' шт.');
end.
4,7(42 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ