Program Z_n;
var a,b:integer;
Begin
Readln(a);
Readln(b);
If a>b then begin write(b,' '); writeln(a); end
else begin write(a,' '); writeln(b); end;
end.
P.s Числа вводите через enter( Ввели число, нажали enter, потом ввели второе число)
Ответ:
Метод постановки всё легко и просто
А*b=S
a-ширина b-длина
(a+3.6)*0.84b=1.05S
0.84ab+3.024b=1.05ab
3.024b=0.21ab
3.024=0.21a
a=3.024/0.21=14.4см
18*0.84b=15.12b
15.12b=15.12b
0=0
все правильно Ответ ширина a=14.4см+3,6см=18см