Даны 2 числа. если хотя бы одно из них четное уменьшить - вопрос №1008264221 от gulbakhar 14.07.2021 08:35

Question

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

gulbakhar · 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....