
Вопрос задан 01.10.2023 в 08:08.
Предмет Информатика.
Спрашивает Ребров Костя.
1 написать программу удвоения меньшего из двух неравных чисел 2 написать программу увеличить
число х на один если оно четное уменьшит на 1 если нечетное

Ответы на вопрос

Отвечает Семенов Макс.
Ответ:
1.
a, b = 1, 2
if a < b:
a *= 2
else:
b *= 2
2.
x = 43 # Любое число
if x%2 == 0:
x += 1
else:
x -= 1



Отвечает Ринчинова Арюна.
1)
var a,b:integer;
begin
writeln('Введите два числа:');
readln(a,b);
if a>b then
b:=b*2
else begin
if b>a then
a:=a*2;
end;
writeln('Первое число =',' ',a);
writeln('Второе число =',' ',b);
end.
2)
var x:integer;
begin
writeln('Задайте число:');
readln(x);
begin
if (x mod 2=0) then
inc(x)
else
dec(x);
end;
writeln(x);
end.



Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.
Для выполнения этих задач можно использовать язык программирования Python. Вот программы для каждой из задач:
- Программа для удвоения меньшего из двух неравных чисел:
python# Ввод двух чисел
num1 = float(input("Введите первое число: "))
num2 = float(input("Введите второе число: "))
# Проверка на неравенство чисел
if num1 != num2:
# Находим меньшее из двух чисел
smaller = min(num1, num2)
# Удваиваем меньшее число
result = smaller * 2
# Вывод результата
print(f"Меньшее число ({smaller}) удвоено равно {result}")
else:
print("Числа равны, удвоение невозможно.")
- Программа для увеличения/уменьшения числа в зависимости от его четности:
python# Ввод числа
x = int(input("Введите целое число: "))
# Проверка на четность
if x % 2 == 0:
# Если число четное, увеличиваем на 1
result = x + 1
print(f"Число {x} четное, увеличено на 1: {result}")
else:
# Если число нечетное, уменьшаем на 1
result = x - 1
print(f"Число {x} нечетное, уменьшено на 1: {result}")
Обе программы предполагают ввод пользователем двух чисел (первая программа) или одного числа (вторая программа) и выводят результат на экран.


Похожие вопросы

Информатика 75

Информатика 92

Информатика 70

Информатика 344

Информатика 62

Информатика 49

Информатика 43
Топ вопросов за вчера в категории Информатика

Информатика 47

Информатика 33

Информатика 67

Информатика 18

Информатика 25

Информатика 563

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