кумир ввели 2 числа выведите первое из них если оно больше второго, и оба числа в противном случае

Program v;Var a,b:integer;BEGINreadln (a);readln (b);if (a > b) then writeln (a)elsebeginwriteln (a);writeln (b);end;END.