Объяснение:
Вредные звуки-чрезмерный шумовой фон, искусственные техногенные звуки, инфра и ультразвук, бранная и нецензурная речь(это как для кого) а также музыка определённых музыкальных направлений.
Полезные звуки-все которые тебя успокаивают. Эти звуки тоже полезные: пение птиц,стрекотания насекомых,шум листвы,журчание ручья этим звуком иногда лечат.
Некоторые душевные расстройства лечатся пением птиц.
Пение дроздов, соловьёв,скворцов и жаворонков снимают стрессовые нагрузки, дают вдохновение.
Звуки капель дождя японские учёные используют в лечение некоторых болезней.
Классическая Музыка успокаивает усталого раздражённого человека.
var
n,a: string;
i, p: integer;
begin
p:= 0;
write('n='); read(n);
write('a='); read(a);
for i := 1 to length(n) do
begin
if n[i] = a then p:=p+1;
end;
writeln('В этом числе цифра ',a,' встречалась ',p,' раз.');
end.