
Вопрос задан 23.10.2023 в 14:24.
Предмет Информатика.
Спрашивает Седина Милена.
АААА НУЖНА ПОМОЩЬ, ЛЮДИ ДОБРЫЕ!!!!! 9 класс, напишите программу даны два числа, не равные друг
другу. Замените большее из них молулем суммы, а меньшее-разностью квадратов этих чисел.

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

Отвечает Маринець Макс.
Program abc;
var a,b,c:integer;
begin
writeln('Введите два числа');
read(a,b);
if a>b then begin c:=a;
a:=abs(a+b);
b:=a*a-b*b; end else
if a<b then begin c:=b;
b:=abs(a+b);
a:=b*b-a*a; end;
writeln(a,' ',b);
end.
var a,b,c:integer;
begin
writeln('Введите два числа');
read(a,b);
if a>b then begin c:=a;
a:=abs(a+b);
b:=a*a-b*b; end else
if a<b then begin c:=b;
b:=abs(a+b);
a:=b*b-a*a; end;
writeln(a,' ',b);
end.



Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.
Конечно, я могу помочь вам написать программу на Python, которая выполняет описанные вами операции. Вот пример программы:
python# Ввод двух чисел от пользователя
num1 = float(input("Введите первое число: "))
num2 = float(input("Введите второе число: "))
# Проверка на равенство чисел и замена их значений, если они равны
if num1 == num2:
print("Числа равны. Введите разные числа.")
else:
# Вычисляем сумму и разность квадратов
сумма = num1 + num2
разность_квадратов = abs(num1**2 - num2**2)
# Определяем большее и меньшее число
большее = max(num1, num2)
меньшее = min(num1, num2)
# Заменяем большее и меньшее числа согласно условию
if большее == num1:
большее = сумма
меньшее = разность_квадратов
else:
большее = разность_квадратов
меньшее = сумма
# Вывод результата
print("Замененное большее число:", большее)
print("Замененное меньшее число:", меньшее)
Эта программа сначала запрашивает у пользователя ввод двух чисел, затем проверяет, равны ли они. Если числа равны, программа выдаст сообщение об ошибке. В противном случае, программа вычисляет сумму и разность квадратов этих чисел, определяет большее и меньшее число, и заменяет их значения в соответствии с вашими условиями.


Похожие вопросы
Топ вопросов за вчера в категории Информатика

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

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

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

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

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

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

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