Составить программу даны 2 числа если первое число болше 2 то его увеличить в 2 раза иначе второе число увеличь В 2 раза
var a,b:integer;
begin
readln(a,b)
If (a>b)
then a:=a*2
else b:=b*2;
end.