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.
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).
Не нашли ответ?
Похожие вопросы