Дима хотел послушать музыку на компьютере, для этого ему нужно было включить музыкальный файл белые_розы. mp3. он начал работу с каталога с: \музыка\хиты. сначала он спустился на один уровень вниз, в каталог ретро, затем поднялся на один уровень вверх, потом спустился на один уровень в каталог лучшие, после чего спустился в каталог про_цветы и нашёл там нужный музыкальный файл. запишите полный путь к данному файлу. 1) с: \белые_розы. mp3 2) с: \музыка\хиты\ретро\про_цветы\белые_ розы. mp3 3) с: \музыка\хиты\лучшие\про_цветы\белые _розы. mp3 4) с: \про_цветы\белые_розы. mp3

если что-то будет не так - напиши, испралю. у меня простог нет возможности проверить, выполняется  

program string_7; var s: string; k,l,i: integer; begin write('введите строку: '); readln(s); k: =0; l: =0; for i: =1 to length(s) dobegin if s[i]='н' then k: =k+1; if s[i]='м' then l: =l+1end; writeln('н=',k); writeln('м=',l); if k> l then writeln ('больше букв н'); if k< l thenwriteln ('больше букв м'); if (k = 0) and (l = 0) thenwriteln ('таких букв нет'); end.

так будет элсе выкидывало бы что букв н больше, если бы ни м ни н не встретилось))

var

  x,y,z: longint;

begin

  readln(x,y,z);

if (x> 100)or(y> 100)or(z> 100) then writeln('false')

else writeln('true');

end.