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

Складіть проект, у якому виконавець зменшить свій образ на 10, якщо до виконавця доторкається вказівник миші, переміститься
вправо на 100, якщо натиснуто клавішу стрілка вправо, або зіграє ноту до, якщо натиснуто клавішу пропуск. Збережіть проект у вашій папці у файлі з іменем завдання 3.3.10.​

Показать ответ
Ответ:
Фуууфиииик
Фуууфиииик
10.04.2021 01:53

Задание 15

num = int(input("Введите число: "))

num_help = num

num_len = 0

first_el = num

last_el = num % 10

while num_help:  # Определяем длину числа

   num_help //= 10

   num_len += 1

count = 0

while count != num_len - 1:  # while num_help > 0:

   first_el //= 10  # first_el = first_el // 10

   count += 1

num //= 10  # Выявляем середину

num %= 10 ** (num_len - 2)  # Возводим в степень

print(str(last_el) + str(num) + str(first_el))

Когда изучите строковый тип данных и срезы, можно будет сделать и так:

num = input("Введите число: ")

print(num[-1] + num[1:-1] + num[0])

Задание 16

num = int(input("Введите число: "))

div = num

mod = 0

last_el = num % 10

count = 0

num_help = num

num_len = 0

while num_help:  # Определяем длину числа

   num_help //= 10

   num_len += 1

while div:

   mod = div % 10

   div //= 10

   if mod == last_el:

       count += 1

if count == num_len:

   print("Цифры в числе одинаковые")

else:

   print("Цифры в числе разные")

Аналогично 1-ому:

num = input("Введите число: ")

if num == num[::-1]:

   print("Цифры в числе одинаковые")

else:

   print("Цифры в числе разные")

0,0(0 оценок)
Ответ:
z0mD
z0mD
05.03.2023 18:45

1.

var x: integer;

begin

   randomize;

   x := random(9000) + 1000;

   x := x - x mod 10;

   writeln(x);

end.

2.

var x, _sum: integer;

begin

   randomize;

   _sum := 0;

   x := random(9000) + 1000;

   x := x - x mod 10;

   writeln('Случайное число:', x);

   while x > 0 do

       begin

       _sum := _sum + x mod 10;

       x := x div 10;

       end;

   if _sum mod 3 = 0 then

       writeln('Сумма цифр кратна трём!')

   else

       writeln('Сумма цифр не кратна трём!');

end.

3.

var x, _sum: integer;

begin

   randomize;

   _sum := 0;

   x := random(9000) + 1000;

   writeln('Случайное число: ', x);

   write('Если записать его в обратном порядке: ');

   while x > 0 do

       begin

       write(x mod 10);

       x := x div 10;

       end;

end.

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