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

Program mnogohodovochka;
var
a,b:integer;
begin
writeln('vvedite a');
readln(a);
writeln('vvedite b');
readln(b);
if a<=b then writeln('a=0, b=', b)
else writeln('a=', a, ' b=', b);
End.