2числа. если a оканчивается на 2 и b положительно, то вывести произведение, иначе сумму.

PascalABC.NET 3.3.5, сборка 1659 от 09.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  var (a,b):=ReadInteger2('Введите через пробел два целых числа');
  if (Abs(a) mod 10=2) and (b>0) then Writeln(a*b)
  else Writeln(a+b)
end.

If ((a mod 10 = 2) and (b > 0)) then
out(a*b);
else
out(a+b);

зависит от языка программирования