Актуальність теми дослідження

Вступ

Begin

Begin

Begin

Var

Begin

Begin

Begin

Begin

Begin

Var

Begin

Var

Begin

Begin

Var

Begin

Begin

Var

Var

Type

Zap = record

familiya: string[20];

imya: string[20];

otchestvo: string[20];

nazvfak: string[20];

nazvkaf: string[20];

sotrstep: string[20];

god_r: integer;

adres: string[50];

end;

f: file of Zap;

Zapis: Zap;

Zaparray: array [1..20] of Zap;

poisks: string[30];

b, n: integer;

vibor: byte;

{-------------------------------------------------------------}

procedure vvod;

i: integer;

assign(f, 'Spisok.dat');

rewrite(f);

writeln('Введите количество сотрудников института ');

readln(n);

writeln('_________________________________________');

for i:= 1 to n do

writeln('Введите ', i, '-го сотрудника');

writeln('Введите фамилию');

readln(Zapis.familiya);

writeln('Введите имя');

readln(Zapis.imya);

writeln('Введите отчество');

readln(Zapis.otchestvo);

writeln('Введите Факультет');

readln(Zapis.nazvfak);

writeln('Введите кафедру');

readln(Zapis.nazvkaf);

writeln('Введите учёную степень');

readln(Zapis.sotrstep);

writeln('Введите год рождения');

readln(Zapis.god_r);

writeln('Введите домашний адрес');

readln(Zapis.adres);

write(f, Zapis);

//Write(f,Zapis.familiya,' ',Zapis.imya,' ',Zapis.otchestvo,', ',Zapis.nazvfak,', ',Zapis.nazvkaf,', ',Zapis.sotrstep,', ',Zapis.god_r,', ',Zapis.adres,'сотрудника');

end;

close(f);

end;

procedure schitivanie;

i: integer;

Assign(f, 'Spisok.dat');

reset(f);

i:= 1;

while not (Eof(f)) do

read(f, Zaparray[i]);

Writeln(Zaparray[i].familiya, ' ', Zaparray[i].imya, ' ', Zaparray[i].otchestvo, ', ', Zaparray[i].nazvfak, ', ', Zaparray[i].nazvkaf, ', ', Zaparray[i].sotrstep, ', ', Zaparray[i].god_r, ', ', Zaparray[i].adres);

i:= i + 1;

end;

close(f);

n:= i - 1;

end;

//read

{---------------------------------------------------------------------}

procedure dobavlenie;

i: integer;

rewrite(f);

writeln('Добавление записи');

for i:= 1 to n do

write(f, Zaparray[i]);

writeln('Введите ', n + 1, '-го сотрудника');

writeln('Введите фамилию');

readln(Zapis.familiya);

writeln('Введите имя');

readln(Zapis.imya);

writeln('Введите отчество');

readln(Zapis.otchestvo);

writeln('Введите Факультет');

readln(Zapis.nazvfak);

writeln('Введите кафедру');

readln(Zapis.nazvkaf);

writeln('Введите учёную степень');

readln(Zapis.sotrstep);

writeln('Введите год рождения');

readln(Zapis.god_r);

writeln('Введите домашний адрес');

readln(Zapis.adres);

write(f, Zapis);

close(f);

end;

{-----------------------------------------------------------------------------}

procedure delete;

i: integer;

clrscr;

i:= 1;

assign(f, 'Spisok.dat');

reset(f);

while not eof(f) do

read(f, Zaparray[i]);

i:= i + 1

end;

close(f);

write('Выберите номер удаляемой записи которую вы хотите: ');

readln(n);

reset(f);

seek(f, filesize(f) - 1);

read(f, Zaparray[i]);

seek(f, n - 1);

write(f, Zaparray[i]);

seek(f, filesize(f) - 1);

truncate(f);

Writeln('Удаление прошло успешно!!!');

Writeln('Количество записей', n - 1);

end;

{------------------------------------------------------------------------------}

procedure poisk;

write('Введите степень ');

readln(poisks);

reset(f);

b:= 0;

while not (Eof(f)) do

read(f, Zapis);

if Zapis.sotrstep = poisks then

b:= 1;

Writeln('Найден сотрудник!');

Write(Zapis.familiya, ' ', Zapis.imya, ' ', Zapis.otchestvo, ', ', Zapis.nazvfak, ', ', Zapis.nazvkaf, ', ', Zapis.sotrstep, ', ', Zapis.god_r, ', ', Zapis.adres);

end;

end;

if b = 0 then

writeln('Нет данных');

close(f);

end;

procedure vivod;

i: integer;

for i:= 1 to n do

if (Zapis.sotrstep = 'доктор') or (Zapis.sotrstep = 'кандидат') then

writeln(Zapis.familiya, ' ', Zapis.imya, ' ', Zapis.otchestvo, ', ', Zapis.nazvkaf, ', ', Zapis.sotrstep, ', ', Zapis.god_r, ', ', Zapis.adres);

end;

clrscr;

Writeln('Выбор действия');

Writeln('1-Ввод новых данных');

Writeln('2-Чтение данных');

Writeln('3-Добавление записей');

Writeln('4-Удаление записи');

Writeln('5-Поиск информации');

Writeln('6-Выход');

readln(vibor);

while vibor < 6 do

case vibor of

1: vvod;

2: schitivanie;

3: dobavlenie;

4: delete;

5: poisk;

end;

writeln;

Writeln('Выбор действия 1-7');

Writeln('Выбор действия');

Writeln('1-Ввод новых данных');

Writeln('2-Чтение данных');

Writeln('3-Добавление записей');

Writeln('4-Удаление записи');

Writeln('5-Поиск информации');

Writeln('6-Выход');

readln(vibor);

end;

end.

Увага - це в першу чергу динамічна характеристика протікання пізнавальної діяльності, увага виражає переважний зв'язок психічної діяльності з визначеним об'єктом, на якому вона зосереджена як у фокусі. На людину постійно впливає безліч самих різноманітних подразників. Свідомість людини не в змозі охопити одночасно з достатньою ясністю всі ці об'єкти. З безлічі навколишніх об'єктів – предметів і явищ – людина виділяє ті, які представляють для неї інтерес, відповідають її потребам і життєвим планам. Будь-яка діяльність людини вимагає виділення об'єкта і зосередженості на ньому.

Спрямованість і зосередженість свідомості на певних об'єктах або певній діяльності при відверненні від всього іншого називають увагою.

Якщо людина не мобілізує своєї уваги, то в її роботі неминучі помилки, а в сприйнятті – неточності і пропуски. Не зосередивши уваги, ми можемо дивитися і не бачити, слухати і не чути, їсти і не відчувати смаку. Увага організовує нашу психіку на все різноманіття відчуттів.

З увагою пов'язані спрямованість і вибірковість пізнавальних процесів. Увагою визначаються:

· точність і деталізація сприйняття (увага є своєрідним підсилювачем, що дозволяє розрізняти деталі зображення);

· міцність і вибірковість пам'яті (увага виступає як чинник, сприяючий збереженню потрібної інформації в короткочасній і оперативній пам'яті);

· спрямованість і продуктивність мислення (увага виступає як обов'язковий чинник правильного розуміння і рішення задачі).

Увага нерозривно пов'язана зі свідомістю в цілому.

Залежно від активності особистості виділяють мимовільну, довільну і післядовільну увагу.

Мимовільна увага виникає без наміру людини побачити або почути що-небудь, без заздалегідь поставленої мети, зусиль волі. Вона може бути викликана несподіванкою або новизною подразника, його силою, рухливістю, контрастом між подразниками.

Довільна увага – активне, цілеспрямоване зосередження свідомості, підтримка рівня якого пов'язана з певними вольовими зусиллями, необхідними для боротьби з сильнішими діями. Подразником у цій ситуації є думка або наказ, який вимовлений про себе і викликає відповідне збудження в корі головного мозку. Довільна увага залежить від стану нервової системи (знижується при засмученому, надмірно збудженому стані і визначається мотиваційними чинниками: силою потреби, відношенням до об'єкта пізнання і установкою (неусвідомлюваною готовністю сприймати предмети і явища дійсності певним чином). Цей вид уваги необхідний для засвоєння трудових навиків, від нього залежить працездатність.

Увага нерозривно пов'язана з діяльністю. На ранніх стадіях філогенетичного розвитку увага безпосередньо включається в практичну діяльність; вона спочатку виникає у вигляді настороженості, готовності до дій по першому сигналу, а може означати і загальмованість, яка служить для підготовки до дій.

Таким чином, викладене вище зумовлює актуальність дослідження курсової роботи.

Об'єктом дослідження курсової роботи виступає вивчення розвитку уваги учнів підліткового віку.

Предмет дослідження – особливості розвитку уваги учнів підліткового віку.

Мета дослідження полягає в теоретичному та емпіричному розгляді проблеми розвитку уваги учнів підліткового віку.

Мета роботи передбачає виконання таких завдань:

· проаналізувати психологічний зміст проблеми в науковій літературі.

· сформулювати адекватну гіпотезу теоретико-емпіричного дослідження;

· здійснити емпіричну перевірку сформульованої гіпотези;

· сформулювати висновки теоретико-емпіричного дослідження.

Гіпотезу даного курсового дослідження можна сформулювати наступним чином:

Особливості вивчення рівня розвитку уваги учнів підліткового віку проявляються у комплексі індивідуальних, особистісних та суб'єктивних якостях конкретного учня.

Практичне значення курсової роботи полягає у можливості наукового використання результатів дослідження. Використати дане дослідження можна при розробці шкільної програми для учнів підліткового віку загальноосвітньої школи.

Методи дослідження. 1. Теоретичні (аналізу та синтезу, порівняльно-типологічний, системний, структурно-функціональний, понятійно-категоріальний);

2. Емпіричні (методика Бурдона в модифікації П. А. Рудника, методика вивчення вибірковості уваги(тест Мюнсберга), спостереження).

Дата добавления: 2015-06-27