ответ:60
var b: integer;
a, c: real;
begin
a:=50;
b:=20;
a:=a-b/2;
if a>b then
c:=a+b
else
c:=b-a;
writeln(c);
end.
ответ:60
var b: integer;
a, c: real;
begin
a:=50;
b:=20;
a:=a-b/2;
if a>b then
c:=a+b
else
c:=b-a;
writeln(c);
end.