даны два числа. если они не равны, то замените каждое из них большими вывести результат. если они равны, то вывести их удвоенную сумму

var a,b:integer;sum:integer;beginwriteln('введите первое число');readln(a);writeln('введите второе число');readln(b);if (a<>b) thenbegina:=a+1;b:=b+1;writeln('числа не равны');writeln('a= ',a);writeln('b= ',b);end;if (a=b) thenbegin sum:=a+b;sum:=sum*2;writeln('числа равны');writeln('удвоенная сумма= ',sum);end;end.