Unit U2;
interface
 uses U3;
 var m : integer;
     x : real;
implementation
begin
 writeln('Unitatea U2:');
 m:=2;
 writeln('   m=', m);
 x:=3.0;
 writeln('   x=', x);
end.