Составить программу на языке Паскаль для задачи: ввести два целых числа Х и Y и выяснить, что больше их сумма или произведение. в качестве результата печатать "сумма" или "произведение" или "равно"

16 Апр 2020 в 19:40
156 +1
0
Ответы
1
program CompareNumbers;
var
X, Y, Sum, Product: integer;
begin
writeln′Введитедвацелыхчисла:′'Введите два целых числа:'Введитедвацелыхчисла:;
readlnXXX;
readlnYYY;
Sum := X + Y;
Product := X * Y;
if Sum > Product then
writeln′Сумма′'Сумма'Сумма else if Product > Sum then
writeln′Произведение′'Произведение'Произведение else
writeln′Равно′'Равно'Равно;
end.
18 Апр 2024 в 13:52
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
Прямой эфир