Ответ:
Var x,y :real;
Begin
x:=7;
y:=x-15;
x:=(x+y)/2;
y:=x-5;
writeln(x,' ',y)
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Ответ:
Var x,y :real;
Begin
x:=7;
y:=x-15;
x:=(x+y)/2;
y:=x-5;
writeln(x,' ',y)
end.