Ввести с клавиатуры два целых числа. Если первое из них больше второго и второе четное,...

Question

Ввести с клавиатуры два целых числа. Если первое из них больше второго и второе четное, то вычислить их сумму, а иначе вычислить их произведение. Результат вывести на экран. ЭТО ОООООООЧЕНЬ СРОЧНО, ПОМОГИТЕ ПОЖАЛУЙСТА...

Answer 1

Ответ:

Program aaa;

Uses Crt;

Var x, y, z, p: integer;

Begin

write('Введите первое число ');

read(x);

write('Введите второе число ');

read(y);

z:=x+y;

p:=x*y;

if x>y and (не знаю, как написать)

then write(z)

else write(p);

end.

Объяснение: сорян, что криво

Comments

спасибо тебе огромноеееее!!!