Даны 2 числа. если хотя бы одно из них четное уменьшить - вопрос №1008264221 от homeLoL 25.08.2020 07:38

Question

Информатика: Даны 2 числа. если хотя бы одно из них четное уменьшить оба на 1, иначе увеличить на 2. составить программу. заранее

homeLoL · Answer

var a,b: integer;beginreadln(a,b);if (a mod 2=0) or (b mod 2=0) thenbegina:=a-1;b:=b-1;end else begina:=a+2;b:=b+2;end;write(a, ,b);end....