Объяснение:
program a;
var
a, b: integer;
begin
Readln(a, b);
if a > b then
writeln('Розочки') ;
if a < b then
Writeln('кактусы') ;
end.
