Выявите 4–5 наиболее серьёзных факторовугрожающих . свое поведение, и мероприятия по устране-
нию угроз на случай их возникновения.

Var   a, r : integer; begin   write('a = ');   readln(a);     write('r = ');   readln(r);       case a div r of        0..1: writeln('no');           else   writeln('yes');   end;     readln; end.

Ну я нашла тільки не знаю мій отвєт буде правильним чи нє

T53  ми бемоль, соль бемоль, си бемоль
d43  фа, ля бемоль, си бемоль, ре бемоль
t6    соль бемоль, си бемоль, ми бемоль
s53  ля бемоль, до бемоль, ми бемоль
d53   си бемоль, ре бемоль, фа
d2    ля бемоль, си бемоль, ре бемоль,фа
d65  фа, си бемоль, ре бемоль
T53  ми бемоль, соль бемоль, си бемоль