Ввести 2 числа если первое кратно 4 а второе положительное, то уменьшить их произведение в 3 раза, в противном случае увеличить их произведение в 4 раза

Question

Ввести 2 числа если первое кратно 4 а второе положительное, то уменьшить их произведение в 3 раза, в противном случае увеличить их произведение в 4 раза

Гость

Ответ(ы) на вопрос:

Accepted Answer

var a, b: integer; begin writeln('vvedite 1 chislo:'); readln(a); writeln('vvedite 2 chislo:'); readln(b); if (a mod 4) = 0 then writeln('resultat ',a*b/3) else writeln('resultat ',a*b*4) end.