жилые люди, то есть люди в возрасте 60 лет и старше, вносят важный вклад в общество, являясь членами семей, добровольцами, а также активными работниками. В то время как большинство пожилых людей имеют хорошее психическое здоровье, многие пожилые люди подвергаются риску развития психических расстройств, неврологических расстройств или проблем, обусловленных употреблением психоактивных веществ, а также других нарушений здоровья, таких как диабет, потеря слуха и остеоартрит. Кроме того, по мере старения люди с большей вероятностью могут иметь несколько нарушений здоровья одновременно.
Проблема
Население мира быстро стареет. За период с 2015 по 2050 год доля пожилых людей в мире, по оценкам, удвоится примерно с 12% до 22%. В абсолютном выражении ожидается увеличение числа людей старше 60 лет с 900 миллионов до 2 миллиардов человек. Пожилые люди сталкиваются с особыми проблемами в плане физического и психического здоровья, которые необходимо признать.
Более 20% взрослых в возрасте 60 лет и старше страдают психическими или неврологическими расстройствами (за исключением расстройств, связанных с головной болью), а 6,6% всей инвалидности (количество лет жизни, скорректированных на инвалидность – DALYs) среди людей старше 60 лет вызвано неврологическими и психическими расстройствами. На эти нарушения здоровья среди пожилого населения приходится 17,4% лет жизни, прожитых с инвалидностью (ЛПИ). Самыми распространенными нейропсихиатрическими расстройствами в этой возрастной группе являются деменция и депрессия, затрагивающие, соответственно, около 5% и 7% пожилого населения мира. Тревожными расстройствами страдают 3,8% пожилых людей, от проблем, вызванных использованием психоактивных веществ — почти 1%, а порядка 25% смертности от причинения себе вреда приходится на долю людей в возрасте 60 лет или старше. Проблемы, вызванные использованием психоактивных веществ, среди престарелых нередко остаются незамеченными или неверно диагностируются.
Program YouName;
Uses crt; // Использование модуля crt.
Const e = 2.71828; // Объявление константы e.
Var // Раздел для описания переменных.
m,n: Integer; // Объявляем целочисленные переменные.
x,u,y: Single; // Объявляем дробные переменные.
Label check1, check2; // Объявляем метки для оператора Goto.
Begin // Начало "тела" программы.
check1: // Метка для без условного перехода с оператора Goto.
write('Введите m: '); // Вывод текстового сообщения на экран консоли.
// {$I-} - это деректива, которая перехватывает вывод ошибок.
// т.e., если во время выполнение программы между {$I-} и {$I+} не будет ошибок,
// то значение IOResult будет равно 0. Если во время выполения программы произойдет ошибка,
// то программа не остановится, а задаст значение IOResult неравное 0.
// {$I+} соответственно отключает дерективу.
{$I-} // Включение директивы.
readln(m); // Ввод значения переменной m.
{$I+} // Отключение директивы
If IOResult <> 0 then // Если IOResult не равно 0 (т.е есть ошибки во время включенной директивы $I), то..
Begin // Начало подпрограммы.
writeln('Вы ввели неизвестный символ.'); // Вывод текстового сообщения на экран консоли.
writeln('Введите число'); // Вывод текстового сообщения на экран консоли.
Goto check1; // Переход на метку check1
End; // Конец подпрограммы.
check2: // Метка для без условного перехода с оператора Goto.
write('Введите n: '); // Вывод текстового сообщения на экран консоли.
{$I-} // Включение директивы.
readln(n); // Ввод значения переменной n.
{$I+} // Отключение директивы.
If IOResult <> 0 then // Если IOResult не равно 0 (т.е есть ошибки во время включенной директивы $I), то..
Begin // Начало подпрограммы.
writeln('Вы ввели неизвестный символ.'); // Вывод текстового сообщения на экран консоли.
writeln('Введите число'); // Вывод текстового сообщения на экран консоли.
Goto check2; // Переход на метку check2
End; // Конец подпрограммы.
x:=(m*n-exp(ln(e)*((-m)*0.7)))/(2.67); // Вычисление x
y:=ln(2)*(m+1); // Вычисление y
u:=0.125*sqrt(x/y)+exp(ln(e)*cos(x-y)); // Вычисление u
writeln(u:0:4); // Вывод текстового сообщения на экран консоли.
// u:0:4 - это задает переменной u четыре знака после запятой.
End. // Конец "тела" программы.
жилые люди, то есть люди в возрасте 60 лет и старше, вносят важный вклад в общество, являясь членами семей, добровольцами, а также активными работниками. В то время как большинство пожилых людей имеют хорошее психическое здоровье, многие пожилые люди подвергаются риску развития психических расстройств, неврологических расстройств или проблем, обусловленных употреблением психоактивных веществ, а также других нарушений здоровья, таких как диабет, потеря слуха и остеоартрит. Кроме того, по мере старения люди с большей вероятностью могут иметь несколько нарушений здоровья одновременно.
Проблема
Население мира быстро стареет. За период с 2015 по 2050 год доля пожилых людей в мире, по оценкам, удвоится примерно с 12% до 22%. В абсолютном выражении ожидается увеличение числа людей старше 60 лет с 900 миллионов до 2 миллиардов человек. Пожилые люди сталкиваются с особыми проблемами в плане физического и психического здоровья, которые необходимо признать.
Более 20% взрослых в возрасте 60 лет и старше страдают психическими или неврологическими расстройствами (за исключением расстройств, связанных с головной болью), а 6,6% всей инвалидности (количество лет жизни, скорректированных на инвалидность – DALYs) среди людей старше 60 лет вызвано неврологическими и психическими расстройствами. На эти нарушения здоровья среди пожилого населения приходится 17,4% лет жизни, прожитых с инвалидностью (ЛПИ). Самыми распространенными нейропсихиатрическими расстройствами в этой возрастной группе являются деменция и депрессия, затрагивающие, соответственно, около 5% и 7% пожилого населения мира. Тревожными расстройствами страдают 3,8% пожилых людей, от проблем, вызванных использованием психоактивных веществ — почти 1%, а порядка 25% смертности от причинения себе вреда приходится на долю людей в возрасте 60 лет или старше. Проблемы, вызванные использованием психоактивных веществ, среди престарелых нередко остаются незамеченными или неверно диагностируются.