Программалау (і ) пәнінен Зертханалық жұмыс №10 Жазбалармен жұмыс
(3-семестр, 4 сағат)
Тапсырма. Берілген сруктураға сәйкесті жазбалар массивін құру. Жазбалар файлын қолдана отырып жазбалардың енгізуін және өндеуін асыруы. Прогаммада кіріс деректерді, дерек қордың файлдарын енгізу-шығаруын өндейтін сәйкесті процедуралар мен функцияды алдын ала қаралыстыру қажет. Қолданушының әрекеттері бақылану және нақты хабарлармен қамдаулану керек. Нәтижесі (дерек қор) файлда сақталып келесі (ақыреттік) өндеуіне жеңіл алынатын болуы керек
Тапсырмалар варианттары
1-6 варианттары:
келесі кілттер арқылы: зеңгерлік (юристік) кеңесінің адресі,заңгерлік кеңесінің аты,адвокат немесе нотариустің аты-жөні бойынша,адвокат немесе нотариустың телефоны бойынша жазба массивін элементерінің өрісіне арналған міндерін шығаруын ескерту
Адвокат
Заңгерлік кеңесінің аты
Нотариус
Заңгерлік кеңесінің адресі
Заңгерлік кеңес
Сұраныстар:
Белгілі ауданда неше заңгерлік кеңесі бар екенін анықтау
Ең көп адвокаттар қай заңгерлік кеңесінде істейтінін анықтау
Ең аз нотариустер қай заңгерлік кеңесінде істейтінін анықтау
Белгілі заңгерлік кеңесінде неше адвокат пен нотариустер жұмыс істейтінін анықтау.
Бір белгі көшеде неше заңгерлік кеңес орналасқанын анықтау
Бір белгі ауданда неше заңгерлік кеңес орналасқанын анықтау
варианттары:
келесі клттер арқылы: мерзімі (уақыты), соттық тексеріс затына,фирма-дуагер аты бойынша,фирма-жауапшы бойынша жазба массивін элементтерінің өрісіне арналған мәндерін шығаруын анықтау.
Сұраныстар:
Қай жылы залымдыққа байланысты істердің саны ең жоғары болғанын анықтау.
Қай жылы банкроттқа ұшырауына байланысты істердің саны ең жоғары болғанын анықтау
Қай жылы ажырасуға байланысты істердің саны ең жоғары болғанын анықтау
Қай жылы дисриминацияға байланысты істердің саны ең жоғары болғанын анықтау
Белгілі фирма қарсы қай жылы ең кқп қылмыстық іс қазғалғанның анықтау
Екі реттен астам қай фирма бойынша қылмыстық іс қозғалған
Қай фирмф өткен жылдар бойынша даугер рөлінде ең жиі шыққанын анықтау
14-24 варианттары
Келесі кілттер арқылы:мердігер фирмасының аты (подрядчик) бойынша,құрылыстын бағасы (құны) бойынша, құрылыстың түрі бойынша,банктегі салымның сомасы (көлемі) бойынша жазба массивтің элементерінің өрісіне арналған мәндерән шығартуын ескерту
Құрылыс
Құрылыс түрі
Клиент
Мәрдігер фирмасы
Бағасы
Сұраныстар:
Банкідегі салымның сомасы құрылыстың бағасынан кем болған клиенттерді анықтау
Құрылыстың бағасын толық төленген клиентті анықтау
Клиенттер екіден кем емес рет тапсырған құрлыстың типін анықтау
Банідегі ең жоғары соманың есепшотына ие болған клиентті анықтау
Мксималды бағасы бар құрылғысын анытау
Минемалды бағасы бар құрылғысын анытау
Несиені ең жоғары пайызға алынған клиентті анықтау
Несиені ең төмен пайызға алынған клиентті анықтау
Барлық клиенттердің төленбеген сомасын
Ең аз төленбеген сомасына ие болған клиентті анықтау.
Ең көп төленбеген сомасына ие болған клиентті анықтау.
25-34 варианттары
Келесі кілттер арқылы: тауарлардың атына байланысты,келіп түскен жылы бойынша, тауарды әкелген мемлекет бойынша,тауар акелетін фирма бойынша жазба массивтің элементерінің өрісіне арқылы арналған мәндерін шығаруын ескеру
Сұраныстар
Қай фирманың тауары ең жиі / аз түскенін анықтау .
Барлық жылдар бойынша түскен тауардың көлемін анықтау.
Ең қымбат / арзан тауардың атын анықтау
Барлық жылдар бойынша тауарлар алу үшін кеткен шығынды есептеу.
Бәрінен жиі / аз тауарға заказ берілген жабдықтаушы-елді анықтау .
Қай айда ең жиі /аз тауарлар түскенін анықтау .
Бақылау мысалы
Студенттер жайлы мәліметтер берілген : аты жөні , туған жылы , туған жері , тұратын адресі .
Файлды құру керек.Құрылған файл Алматылық студенттер жайлы мәлімет оқып және 18 – жастан кіші студенттер жайлы мәліметтерді шығару керек.
Program primer 9;
Uses crt ;
Type
Mydata = record
Fio :INTEGER ;
Year :integer ;
Place : string;
Addr : string;
End;
Myfile = file of mydata ;
Var
Fin , fout :myfile ;
Trec : mydata ;
N , I , k :integer;
Procedure inputdata ;
Begin
Write(‘Kolichestvo=’);
Readln(n);