1.4 Информатика кафедрасы тарихы Мырзахметова Баян Шалатайқызы–кафедра меңгерушісі, техника ғылымдарының кандидаты
«Информатика» кафедрасы 2002 жылға дейін «Алгебра және ықтималдықтар теориясы», «Информатика және есептеуіш техника», «Ақпараттандыру» деген аттармен белгілі.
Кафедра меңгерушіcі қызметін профессор Қ. Бектаев, доцент Г. Тілеубергенова, доцент Б.Сариев, 1996-2008 жылдары ХҚТУ профессоры А. Әмірбекұлы атқарған.
2002-2003 оқу жылында «Ақпараттандыру» кафедрасынан «Бағдарламалау және есептеу техникасы» кафедрасы бөлініп шықты.
2011-2012 оқу жылында кафедралар «Информатика» болып қайтадан бірікті. «Информатика» кафедрасын 2011-2012 оқу жылы п.ғ.к., доцент Е.И. Байдыбекова басқарды. 2012 жылдан бастап кафедраны т.ғ.к. Мырзахметова Б.Ш басқарып келеді.
Қазіргі уақытта доценттер: п.ғ.д. Р.І.Қадырбаева, п.ғ.к. А.Әмірбекұлы, э.ғ.к. Н.Ф.Сарсенбиева, п.ғ.к.Г.К.Нурмуханбетова, аға оқытушылар: т.ғ.к. Мырзахметова Б.Ш., п.ғ.к. Адылбекова Э.Т.. магистр-оқытушылар: А.У.Лесбаев, А.Ж.Бәймішева, К.М.Құлжатаева, Ж.Ш.Мырзаханов информатика ғылымының қыры мен сырын студенттерге терең меңгеру жолында жемісті еңбек етіп келеді.
Кафедраға 7 компьютерлік дәрісхана бөлінген, барлығы толық заманау техникалармен жабдықталған.
Кафедра доценті А.Әмірбекұлының білім беру саласындағы ерен еңбегі бағаланып, ҚР Білім және ғылым министрлігі тарапынан Ы.Алтынсарин атындағы медальмен марапатталды.
Кафедра магистр-оқытушылары А.Лесбаев Санкт-Петербург мемлекеттік технологиялық институтында 2 апталық ғылыми-зерттеу тағылымдамадан, Ж.Мырзаханов «Өрлеу» біліктілікті арттыру Ұлттық орталығы арқылы Германия мемлекеті, Дюссельдорф қаласы, Халықаралық менеджмент және технолия академиясына білімін жетілдіріп келді, сертификат алды.
2. Оқу іс-тәжірбесі бойынша орындалған тапсырмалар
2.1
8.6. n бүтін саны және n оң нақты саннан тұратын тізбек берілген. Тізбектегі барлық сандардың бөлшек бөліктерін (нөлдік бүтін бөлімі бар нақты сан түрінде) берілген тәртіппен шығару және сандардың бөлшек бөліктерінің көбейтіндісін табу керек.
R,Pro:Real;
i,N:integer;
begin
Pro:=1;
write('n engiz');
readln(N);
for i:=1 to N do
begin
write('R engiz');
readln(R);
writeln(Frac(r));
Pro:=Pro*(Frac(R));
end;
writeln(Pro);
end.
8.32. n,k бүтін сандары және әрқайсысында n элементі бар k бүтін сандар жиыны берілген. Әрбір тізім үшін оның құрамындағы мәні 2-ге тең алғашқы элементтің реттік нөмірі, ал егер тізімнің екілігі жоқ болса, онда 0 саны шығарылсын.
var
K,N,Ni,Ki,A,Num: integer;
begin
Write('N engiz');
readln(N);
Write('K engiz');
readln(K);
for Ki:=1 to K do
begin
Num:=0;
for Ni:=N downto 1 do
begin
write(' Ki жиыннан Ni sanin engiz');
readln(A);
if a=2 then Num:=Ni;
end;
Writeln(Num);
end;
2.2 Жиындарға арналған есептер
Жиындар: математикада жиын деп, бiрдей типтегi элементтердiң тобын айтады, ал Паскаль тiлiнде типтерi реттелмеген әр түрлi элементтер тобын – жиын деп атайды. Жиынға бiр ғана ат қойылады. Жиындар типiн баяндау. Жиын типi Set, of – түйiндi сөзiмен, одан кейiн жиынды айқындайтын негiзгi типiмен баяндалады; Var бөлiмiнде: Var жиын_аты: Set of негiзгi_тип; Мысалы: Var c: set of char; Type бөлiмiнде: Type Тип_атауы = set of негiзгi_тип; Var жиын_аты: тип_аты; Мысалы: Type A=set of негiзгi_тип; Жиынның айнымалысы мен тұрақтыларының мәндерi программаның нұсқаулар бөлiгінде конструктор көмегiмен жазылады. Конструктор деген квадрат жақшаға алынған барлық элементтердiң тiзiмi. Мысалы: A1:=[1,3,5,25]; B1:=[ ]; {бос жиын}; C1:=[ ‘A‘,‘B‘,‘D‘]; Фигура:=[круг, ромб, квадрат]; Жиынның негiзгi типi ретiнде – кез келген қарапайым типiн қолдануға болады, бiрақ нақты сандар (real) типiн пайдалануға болмайды. Жиынның негiзгi типiне, бүтiн сандар (integer) типiнiң шектелген типiмен де анықтауға болады. Жиын элементтерiнiң саны – Паскаль тiлiнiң нұсқауымен анықталады. Ал жалпы элементтерiнiң саны: 64 пен 256 арасында. Жиындар элементтерi үтiр арқылы бөлектенiп, квадрат жақшаға алынып жазылады. Бос жиынды элементi көрсетiлген квадрат жақшаға алып белгiлейдi. Бос жиын бiреу және ол жиындардың кез келген типтерiне жатады.
10.17. n бүтін саны және n элементтен тұратын жиын берілген. Осы жиындағы соңғы максимум элементтен кейін орналасқан элементтер санын анықтау керек.
var
N,Ni,Max,MaxNum,i:integer;
begin
write('N engiz');
readln(N);
for i:=1 to N do
begin
write(i,'san:');
readln(Ni);
if i=1 then
begin
Max:=Ni;
MaxNum:=i;
end;
if Ni>=Max then
begin
Max:=Ni;
MaxNum:=i;
end;
end;
writeln(n-MaxNum);
end.
