В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Сніжана111
Сніжана111
25.12.2021 03:15 •  Информатика

PYTHON за все 4 задачи С клавиатуры вводится 5 целых чисел - веса собак.

Сколько весит самая тяжелая собака из предложенных?

Формат входных данных

С клавиатуры вводится 5 целых чисел.

0 < a, b, c, d, e < 10000

Формат выходных данных

ответ - число.

2)
В первой строке вводится целое число - контрольный вес.

В следующей строке вводится 4 числа - веса собак.

Если собак, которые тяжелее (строго больше), чем контрольный вес, больше, чем тех, что не тяжелее (меньше или равен контрольному), то напечатайте на экран "Группа тяжеловесов больше".

Если количество собак, которые легче, чем контрольный вес, преобладает среди всех собак, то напечатайте: "Группа минипесиков больше".

Если группы одинаковые по количеству, то напечатайте "Группы равны".

Формат входных данных
В первой строке вводится одно целое число: 0 < x < 10000

В следующей строке вводится 4 целых числа: 0 < a, b, c, d < 10000

Формат выходных данных
Фраза - ответ.

3)
С клавиатуры вводится 3 целых трехзначных числа.

Посчитайте количество чисел палиндромов среди этих трёх.

Палиндром - симметричное число (Например, 323, 717, 464).

Формат входных данных
С клавиатуры вводится 3 целых числа.

99 < x, y, z < 1000

Формат выходных данных
Количество чисел палиндромов.

4)
С клавиатуры вводится 4 целых числа - номера пёсиков-участников.

Все пудели имеют в номере на позиции десятков цифру 7 или 8.

Найдите минималый номер, принадлежащий пуделю. Если среди собак нет ни одного пуделя, то напечатайте фразу "Пудели не явились".

Формат выходных данных
С клавиатуры вводится 4 целых числа.

9 < a, b, c, d < 10000000

Показать ответ
Ответ:
dkhairov1993
dkhairov1993
05.02.2023 23:30
1) F=Av(¬A&B)
По закону дистрибутивности раскроем скобки
(Av¬A)&(AvB)
Av¬A = 1, значит остаётся AvB

2) F =A&(¬AvB)
По тому же закону раскрываем скобки
(A&¬A)v(A&B)
A&¬A = 0, значит остаётся A&B

3. (AvB)&(¬BvA)&(¬CvB)
По закону склеивания (AvB)&(¬BvA) = A , получается, что выражение принимает вид
A&(¬CvB)
Можно раскрыть скобки, получим
A&¬C v A&B

4) F =(1v(AvB))v((AC)&1) 
Скобка (1v(AvB)) = 1, так как 1 v ЧТОУГОДНО = 1
Получаем выражение
1v((AC)&1) = 1, так как 1 v ЧТОУГОДНО = 1
ответ 1
0,0(0 оценок)
Ответ:
Aelly
Aelly
06.01.2020 01:49
Program pr;
uses crt;

Var mas:array[1..1000, 1..1000] of integer;
N,M,i,j,k:integer;

Begin
Writeln('Введите размер матрицы N*M');
Write('N = ');
readln(N);
Write('M = ');
readln(M);

if (M>1000) or (N>1000) or (M<1) or (N<1)
then  
Writeln('Ошибка, указанные значения выходят за пределы матрицы')   else   
        Begin      
 Writeln('Введите элементы матрицы');      

k:=0; 
 for i:=1 to N do     
  for j:=1 to M do     
    Begin     
      readln(mas[i,j]);       
      if (mas[i,j] mod 2 = 0) then k:=k+1;     
    end; 
  
    Writeln();   
    Writeln('Исходная матрица');
   
   for i:=1 to N do   
     Begin     
       for j:=1 to M do     
          Begin     
             Write(mas[i,j], ' ')     
           end;     
      Writeln();   
     end;         

Writeln();   
Writeln('Количество четных элементов = ',k);      
 end;

readln;
end.
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота