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

vara,b,i: integer;beginwriteln ('введи два числа');read (a,b);if a>b then writeln (a,'большее число')

else

writeln (b,'большее число') end.