Ребят,помогите пожалуйста по информатике.Нужно составить алгоритм и программу!!! Дано...

Question

Ребят,помогите пожалуйста по информатике.Нужно составить алгоритм и программу!!! Дано x,y,z.Если они равны между собой,то увеличить в 3 раза и вывести результат.Если y=z,то заменить на противоположный знак и вывести результат.Иначе все числа сделать =222 и вывести результат

Answer 1

Var
     var
       a,b: integer;
 begin
 readln (a,b);
if a = b then
 writeln (4*a)
  else
   writeln(a+1,' ',b+2);
end.