Program u4_1; var x , y : integer ; описываем используемые переменные begin writeln(‘введите 2 числа ‘); на экран выводим поясняющую надпись «введите 2 числа» readln ( x , y ); вводим два целых числа через пробел if x> y then writeln (x) если х больше y, то выводим х else writeln ( y ); иначе выводим y end. 1. измените программу u 4_1 для нахождения большего из трех чисел.