составить программу и записать на одном из языков программирования . с клавиатуры вводятся три числа A,B,C . если А четное отрицательное число,то вывести на экран значение суммы чисел A,B,C ,иначе значение произведения.

var a, b, c: integer;

begin

  readln(a, b, c);

  if (a<0)and(a mod 2=0) then writeln(a+b+c)

  else writeln(a*b*c);

end.