Попытайтесь заменить полную форму ветвления на два неполных ветвления: если слева стена то вправо иначе влево все всегда ли можно сделать такую замену

11111111111111111111111

2222222222222222222222

Объяснение:

vara,b: integer; c: real; beginwriteln ('1'); read (a); writeln ('2'); read (b); c: =(a/1)/(1/b); writeln (c); end.

var

x: real;

begin

readln(x);

writeln(round(x));

end.