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

Есть ли здесь связь многие ко многим, если да то где

Показать ответ
Ответ:
Арте2281337
Арте2281337
09.01.2023 12:07

Программа:

num = input()

print("YES" if num[-1] in ["2", "3"] and int(num) % 3 == 0 and len(num) == 3 else "NO")

Сложна для понимания, поэтому приведу 2-ой вид программы:

num = input()

if len(num) == 3 and num[-1] in ["2", "3"] and int(num) % 3 == 0:

   print("YES")

else:

   print("NO")

Конечно, можно и через операторы % и // сделать:

num = int(input())

count = 0  # Переменная-счётчик кол-ва цифр в числе

last_num = num  # Переменная для последней цифры в числе

num_c = num

while num_c:

   num_c = num_c // 10

   count += 1

if count == 3:  # Проверка на кол-во цифр в числе

   last_num = last_num // 10  # Например, 123 -> 12

   last_num = last_num % 10  # 12 -> 2

   if num % 3 == 0 and (last_num == 2 or last_num == 3):

       print("YES")

   else:

       print("NO")

else:

   print("NO")

0,0(0 оценок)
Ответ:
nekit1307
nekit1307
22.07.2021 12:18

Решение на паскале.

Объяснение:

Первая задача:

var summa, kolichestvo : integer;

 begin

   summa := 2;

   while summa <= 100 do

   begin

     summa := summa + 8;

     kolichestvo := kolichestvo + 1;

   end;

   writeln('Количество = ', kolichestvo);

 end.

Вторая задача:

var a : array[1..20] of integer;

   kolpol, sumot, i : integer;

begin

 for i:=1 to 20 do

   Read(a[i]);

 for i := 1 to 20 do

   if a[i] >= 0 then

     kolpol := kolpol +1

   else

     sumot := sumot + a[i];

 writeln('Количество положительных = ', kolpol);

 writeln('Сумма отрицательных = ', sumot);

end.

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