program task31057170;
var
x: integer;
y: real;
begin
Writeln('ВВЕДИТЕ X: ');
Readln(x);
if x > 25 then
y := x / 2
else if x < 25 then
y := x + 4
else Writeln('Error: x = 25!');
Writeln('Y = ', y);
end.
Ответ:
480
Объяснение:
a + x = 370
b + x = 250
a + x + b + x = 370 + 250
a + b + x + x = 620
a + b + x = 620 - х
x = 140
a + b + x = 620 - 140
a + b + x = 480