(вставь формулу), где N – количество цветов в палитре, i – глубина цвета. е) , (вставь формулу), где -I информационный объём графического файла, K - количество пикселей, имеющихся в изображении, – I глубина цвета

Знание познавательных процессов непосредственно необходимо лечащему врачу. Зрение – офтальмология, слух – отоларингология и так далее. Психологические знания в работе врача – сфера межличностных отношений, отражение психического состояния в картине болезни, знание картины личности пациента.

Связь психологии с медицинскими науками обусловлена двойственной природой человека (социального и биологического существа).Большинство психических явлений имеет физиологическую обусловленность. Суть в следующем: психическое состояние человека отражается на его физиологическом состоянии, а в определенных ситуациях психические особенности могут развитию какого-либо заболевания. Хроническое заболевание сказывается на психическом состоянии больного. В современной медицине получили активное развитие методы психотерапевтического воздействия словом.

Одна из отраслей психологии – медицинская психология – изучает психологические аспекты гигиены, профилактики, диагностики, лечения, экспертизы и реабилитации больных. Область исследований медицинской психологии – вопросы возникновения, развития и течения болезней, влияние болезней на психику и наоборот.

Структура медицинской психологии: клиническая психология общая медицинская психология; психопрофилактика и психогигиена; психокоррекция.

Связь психологии и медицины на уровне понятийного аппарата осуществляется через такие термины как здоровье, болезнь, телесная функция.

Психическое здоровье – состояние благополучия, при котором человек может реализовать свой собственный потенциал,продуктивно и плодотворно работать, а также вносить вклад в жизнь своего сообщества.

Program Scheme;

Var xn,xk,dx,x,s,p,k,y: Extended;

Label rep;

Begin

write('Enter xn: ');

readln(xn);

write('Enter xk: ');

readln(xk);

write('Enter dx: ');

readln(dx);

s:=0; p:=1; x:=xn; k:=0;

rep:

If x <= xk then

 Begin

  y:=exp(sin(x))*cos(x);

  writeln('x = ',x:0:3, '  y = ', y:0:3);

  if y >= 0 then

  s:=s+y;

  if y <> 0 then

  p:=p*y;

  x:=x+dx;

  goto rep;

 End

else

 Begin

  writeln('S = ', s:0:3, ' P = ', p:0:3, ' k = ', k:0:3);

  exit;

 End;

End.

Объяснение: Если есть вопросы, пишите в лс.