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.

Answer 1

Программа работает. Вычисляет сумму введенных чисел и их произведение (x и y).