varx,y:real;beginreadln(x);readln(y);x:=x+y;y:=x-y;x:=x-y;writeln(x,' ',y)end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
var
x,y:real;
begin
readln(x);
readln(y);
x:=x+y;
y:=x-y;
x:=x-y;
writeln(x,' ',y)
end.