Рис расфасован в два пакета. С клавиатуры вводятся вес

первого пакета m кг, второго - n кг. Определить какой пакет тяжелее и

вес более тяжелого пакета

Вот программный код на паскале:

var

m, n: integer;

begin

read (m, n) ;

if m > n then

begin

writeln ('1 paket tyajelee') ;

writeln ('Ves tyajologo bolee paketa = ', m) ;

end;

if m < n then

begin

writeln ('2 paket tyajelee') ;

writeln ('Ves tyajologo bolee paketa = ', n) ;

end;

readln;

end.