Упражнения. 1. Страхові виплати на відшкодування здоров'я потерпілих від нещасних випадків та профзахворювань.

1. Страхові виплати на відшкодування здоров'я потерпілих від нещасних випадків та профзахворювань.

2. Практична реалізація Закону України "Про охорону праці".

3. Основні напрями працеохоронної діяльності в Україні.

4. Реалізація державної політики в галузі соціального захисту праці людей у Законі України «Про загальнообов'язкове державне соціальне страхування від нещасного випадку на виробництві та професійного захворювання, які спричинили втрату працездатності» від 23 вересня 1999 року.

5. Навчання в питанні охорони праці згідно закону України №229 – IV та НПАОП 0.00-4.36-05.

6. Основні принципи страхування від нещасного випадку, категорії працівників, що підлягають обов’язковому страхуванню.

7. Які види відповідальності передбачені за порушення вимог законодавства з охорони праці та як вони реалізуються?

8. Актуальність питань пожежної безпеки для працівників податкової служби. Забезпечення пожежної безпеки в приміщеннях податкової інспекції.

9. Закон України «Про збір та облік Єдиного внеску на загальнообов’язкове державне соціальне страхування…». Його основні положення стосовно соціального захисту потерпілих від нещасного випадку або професійного захворювання.

10. Профілактичні заходи щодо збереження здоров’я та працездатності працівників податкової служби.

11. Профілактика нещасних випадків, яку здійснює Фонд соціального страхування від нещасних випадків.

12. Атестація робочих місць працівників податкової служби, соціальної сфери, юристів та підприємств.

13. Організація роботи інспекторів державного нагляду з охорони праці, їх права.

14. Особливості розумової праці співробітників органів ДФС.

15. Колективний договір – відображення питань охорони праці в колективному договорі.

16. Нормативні документи в галузі охорони праці: Закони, Постанови, Положення, інструкції, які мають практичне застосування в органах ДФС.

17. Організація і структура служби охорони праці. Планування робіт в галузі охорони праці.

18. Пільги та компенсації за умови праці, що не відповідають нормативним.

19. Фінансування охорони праці в органах ДФС.

20. Організація пожежної безпеки в приміщеннях органів ДФС.

СОСТАВЛЕНИЕ АЛГОРИТМОВ С ИСПОЛЬЗОВАНИЕМ СИМВОЛЬНЫХ И СТРОКОВЫХ ВЕЛИЧИН

Напомним несколько базовых алгоритмов со строками

1. Определение количества вхождений символа t в строку s.

k:=0; For i:=1 to length(s) do If s[i]=t then inc(k);

k:=0; For i:=1 to length(s) do If copy(s,i,1)=t then inc(k);

k:=0; n:=length(p); For i:=1 to length(s) - n+1 do If copy(s,i, n)=p then inc(k);

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

3.Замена всех символов t в строке s на символ х.

For i:=1 to length(s) do If s[i]=t then s[i]:=х;

whilepos(t,s)<>0 do begin i:=pos(t,s); delete(s,i,1); insert(x,s,i); end;

i:=1; whilei<= length(s) do begin If copy(s,i,1)=t then begin delete(s,i,1); insert(x,s,i); end; inc(i); end;

 

 

n:=length(t); i:=1; whilei<= length(s) - n+1 do If copy(s,i,n)=t then begin delete(s,i,n); insert(x,s,i); inc(i); end;

n:=length(t); whilepos(t,s)<>0 do begin i:=pos(t,s); delete(s,i, n); insert(x,s,i); end;

4. Для замены всех вхождений слова t на слово х в строке s лучше использовать второй или третий способ.

5. Накопление строки в обратном порядке. Палиндром 1.

ss:=’’; For i:=1 to length(s) do ss:=s[i]+ss; ifss=s thenwriteln(‘палиндром’) elsewriteln(‘непалиндром’);

При выполнении такого алгоритма палиндромами окажутся строки типа ‘казак’, ‘шалаш’, но фраза ‘А роза упала на лапу Азора.’ - нет.

 

6. Замена прописных букв строчными.

S1:=’АБВГДЕЁЖЗИЙКЛМНОПРСТУФХЦЧШЩЬЫЪЭЮЯ’; S2:=’абвгдеёжзийклмнопрстуфхцчшщьыъэюя’; For i:=1 to length(S) do For j:=1 to length(S1) do if S[i]=S1[j] then S[i]:=S2[j];

write(lowercase(s));   Проблема: Эта функция не работает во FreePascal с русскими буквами.

 

 

7.Удаление знаков препинания (всех возможных и невозможныхJ).

znaki:='!"№;%?*()@#$%^:&<>`~=+/.,'''; For i:=1 to length(s)do begin flag:=1; For j:=1 to length(znaki) do If s[i]=znaki[j] then flag:=0; if flag=1 thenss:=ss+s1[i]; end;

 

Упражнения

1) Программист Иннокентий с детства очень невнимателен. И когда он набирает на компьютере арифметические выражения, то часто пропускает то открывающиеся, то закрывающиеся скобки, вследствие чего Иннокентия часто ругает начальник отдела Савелий Тереньевич и уменьшает ему зарплату. Помогите горе-программисту и напишите программу, которая проверяет, нужное ли количество скобок поставил Иннокентий в арифметическом выражении (количество открывающихся и закрывающихся скобок должны совпадать).

№	Входные данные	Выходные данные
	(1+3)*5–3/(5-12)	YES
	(1+3))*5	NO

2) Дана последовательность символов (длиной не более 70 символов). Замените в ней все точки запятыми, все маленькие буквы «о» на большие, все тире двумя точками.

3) Удалите все «лишние» пробелы из введенной строки. Учтите, что данную задачу зачастую приходится решить в ТРWord: горе-юзеры часто между словами ставят два, три или сколько угодно пробелов. Помогите фирме Microsoft написать программу для решения этой проблемы.

4) Определите, является введённый с клавиатуры символ: русской или латинской буквой, или цифрой, или не относится ни к буквам, ни к цифрам.

5) Подсчитайте сумму цифр во введённой строке символов.