Question

Помогите с решением! Program pr_1 Var x, y, sum, umn:integer; Begin Write ('x=') ; readln (x) ; Write ('y=') ; readln (y) Sum:=x+y; Umn:=x*y; Writeln ('sum=', sum) ; Writeln ('umn=', umn) ; readln; End. Результаты работы внесите в таблицу для заданных x и y. X=28 Y=50

Answer 1

X Y Sum Umn

28 50 78 1400

Answer 2

Давайте решим эту программу для заданных значений x=28 и y=50.

Программа вычисляет сумму (Sum) и произведение (Umn) двух чисел, которые пользователь вводит с клавиатуры (x и y).

1. Подставим значения x=28 и y=50 в программу:

makefileCopy code
x=28
y=50

2. Вычислим сумму (Sum) и произведение (Umn) по формулам:

makefileCopy code
Sum = x + y
Umn = x * y

3. Подставим значения x и y:

makefileCopy code
Sum = 28 + 50 = 78
Umn = 28 * 50 = 1400

Таким образом, результаты работы программы для заданных значений x=28 и y=50:

makefileCopy code
sum=78
umn=1400

Вы можете внести эти значения в таблицу.