Паскаль. ввести массив и вывести количество различных элементов этого массива. все через процедуру. .

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

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

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

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

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

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

Строка вводится с клавиатуры(максимум 99 символов). Первое слово должно быть с маленькой буквы или первая и последняя буквы этого слова не должны совпадать(иначе такое слово как Test не засчитается). Также будет засчитываться одна буква(abc d efg, буква d подходит, так как она и первая и последняя)

#include <iostream>
using std::cout;
using std::cin;
using std::endl;
#include <cstring>
using std::strtok;
using std::strlen;

int main()
{
char a[100], *ptr;

cout << "Enter the string:" << endl;
cin.getline(a, 100);

cout << endl;

ptr = strtok(a, "., ");
while(ptr)
{
if(*ptr == *(ptr + strlen(ptr) - 1))
{
cout << ptr << ' ';
}

ptr = strtok(NULL, "., ");
}

cout << endl;

return 0;
}