Для разделения целой и дробной частей десятичной дроби использовать запятую.
Вводить отрицательные числа со знаком минус или взять число в скобки.
Для обозначения процентов после числа вводить символ "%".
Обычную дробь нужно вводить, указывая и отделяя её от дробной пробелом.
Обозначение единиц измерения после чисел не вводится, только если это не денежные единицы.
перевод:
Для поділу цілої та дробової частин десяткового дробу використовувати кому.
Вводити негативні числа зі знаком мінус або взяти число в дужки.
Для позначення відсотків після числа вводити символ "%".
Звичайну дріб потрібно вводити, вказуючи і відокремлюючи її від дробу прогалиною.
Позначення одиниць виміру після чисел не вводиться, тільки якщо це не грошові одиниці.
var
A, B, K, R : longint;
begin
readln(A, B);
if (A mod 2 = 1) and (B mod 2 = 1) then
writeln('-1');
if (A mod 2 = 0) and (B mod 2 = 0) and
((A div 2 <> B) or (B div 2 <> A)) then
writeln('-1');
if (A mod 2 = 0) and (B mod 2 = 0) and
((A div 2 = B) or (B div 2 = A)) then
if A > B then
writeln(B, '0')
else
writeln('0', A);
if (A mod 2 = 1) and (B mod 2 = A) then begin
A := A-1;
B := B-2;
if (A div 2 = B) or (B div 2 = A) then
if A > B then
writeln(B, '0')
else
writeln('0', A);
end;
if (B mod 2 = 1) and (A mod 2 = B) then begin
B := B-1;
A := A-2;
if (B div 2 = A) or (A div 2 = B) then
if B > A then
writeln(B, '0')
else
writeln('0', A)
end;
end.
На Всё что могу.
