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

Пусть а, b, с - логические величины, которые имеют следующие значения: a = ложь, b = ложь, с = истина. Определите результаты вычисления следующих логических выражений: 1) а и b или с 2) а или b и с 3) не а или b и с 4) (а или b) и (с или b) 5) не (а или b) и (с или b)

👇
Ответ:
ernarsailaubek
ernarsailaubek
13.04.2021

ответ 3 правильно я делала это мне Учитель поставил верно

4,6(10 оценок)
Открыть все ответы
Ответ:
leravolk399
leravolk399
13.04.2021
Если, например, Х = 5 сек, то за 5 сек Флэш выпустит 2 молнии, а за 10 сек - 3.
То есть количество молний A = int(Y : X) + 1, где
Y = N*60 + M - количество отведенного времени в секундах.
Вся суть программы:
X = Input (input.txt, X); // Принимаем секунды из файла, пишем в переменную X
N = Input (input.txt, N); // Принимаем минуты из файла, пишем в переменную N
M = Input (input.txt, M); // Принимаем секунды из файла, пишем в переменную M
Y = N*60 + M; // Вычисляем отведенное время в секундах
A = int(Y : X) + 1; // Вычисляем количество молний
Output (A, output.txt); // Выводим его в файл.
4,7(28 оценок)
Ответ:
velvis2050
velvis2050
13.04.2021
Var
  a : array [1..5, 1..5] of integer;
  i, j : integer;
begin
  randomize;
  for i := 1 to 5 do
  begin
    for j := 1 to 5 do
    begin
      a[i, j] := random (1000);
      write (a[i, j], ' ');
    end;
    writeln;
  end;
  for i := 1 to 5 do
    for j := 1 to 5 do
      if i > j then a[i, j] := 1
      else if j > i then a[i, j] := 0;
  for i := 1 to 5 do
  begin
    for j := 1 to 5 do
      write (a[i, j], ' ');
    writeln;
  end;
end.

var
  a : array [1..4, 1..5] of integer;
  i, j, m, c : integer;
begin
  randomize;
  m := 1000;
  for i := 1 to 4 do
  begin
    for j := 1 to 5 do
    begin
      a[i, j] := random (1000);
      if a[i, j] < m then m := a[i, j];
      write (a[i, j], ' ');
    end;
    writeln;
  end;  
  c := 0;
  for i := 1 to 4 do
    for j := 1 to 5 do  
      if a[i, j] = m then
        c := c + 1;
  writeln (m, ' ', c);
end.

var
  a : array [1..4, 1..4] of integer;
  i, j, p : integer;
begin
  randomize;
  for i := 1 to 4 do
  begin
    for j := 1 to 4 do
    begin
      a[i, j] := random (10);
      write (a[i, j], ' ');
    end;
    writeln;
  end;
  p := 1;
  for i := 1 to 4 do
  begin
    if a[i, i] <> 0 then p := p * a[i, i];
    if a[i, 5 - i] <> 0 then p := p * a[i, 5 - i];
  end;
  writeln (p);
end.
4,5(91 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ