Ўзбекистон Республикаси Олий ва Ўрта Махсус таълим вазирлиги Фаргона политехника институти


ЁЗИЛИШИ: SET TALK ON | OFF ВАЗИФАСИ



Download 1,17 Mb.
bet60/69
Sana28.06.2022
Hajmi1,17 Mb.
#712699
1   ...   56   57   58   59   60   61   62   63   ...   69
Bog'liq
PASCAL

ЁЗИЛИШИ: SET TALK ON | OFF
ВАЗИФАСИ: SET TALK ON холатда экранга командалар (SORT,PACK каби ) протoколи чикарилиб турилади. OFF - бекор килади.
ЁЗИЛИШИ: SET TYPEAHEAD TO <узгарувчи N >
ВАЗИФАСИ: Киритиш буферини ёкади/учиради. Агар <узгарувчиN> нинг киймати 0 га тенг булса буферда хеч кандай символ саклаб колинмайди. Агар <узгарувчи N>га 1 дан 32.000 (максимал) гача сон берилган булса, киритиш буферида I28 тагача символ сакланиши мумкин. <Узгарувчи N> = 0 булганда TYPEAHEAD командаси ON KEY командасининг INKEY() функциясини бекор килади.
ЁЗИЛИШИ: SET UNIQUЕ OFF | ON
ВАЗИФАСИ: Индекс файл хосил килишда хамма ёзувлар хам бир хил ахамиятга эга ёки эга булмаслигини таъминлайди. ON холатда факат 1-шартга жавоб берувчи ёзув индекс килинади.

Назорат саволлари


1. Йил форматини аниклаш кандай амалга оширилади?
2 Ранг атрибутлари каси команда ердамида урнатилади?
3. Ёзувлар группасини фильтрлаш канай амалга оширилади?
4. сана форматларини урнатиш каси команда ердамида бажарилади?
5. SAY командаси йуналишини урнатиш кандай бажарилади?
6. Сстатус катори нима?
7. SET STEP комндасининг вазифаси нима?
8. SET TYPEAHEAD TO командаси нима вазифани бажаради?
9. SET UNIQUЕ OFF | ON командасининг вазифаси нима?
10. SET SCOREBOARD ON | OFF командаси нима вазифани бажаради?


17-Мавзу. Карат мухитида дастур тузиш.

3.48. Меню ташкил килиш.


Меню, меню хосил килиш, меню номи, CASE ва IF операторлари, менюни ишга тушириш, дастурни ишга тушириш.
Дастур тузувчи энг аввало бажариладиган вазифанинг алгоритмини билиши, команда ва функциялар тугрисида маълумотга эга булиши керак. Агар дастур маълумотлар базаси (МБ) файли билан ишлаш учун тузилса, МБ нинг жорий каталогда мавжуд булиши, еки уни дастур тузишдан аввал ташкил килиб олиш керак.
Дастур тузиш учун тахрирловчини чакириш учун интерактив режимда туриб
. MODIFY COMMAND <файл> командаси берилади. Агар <файл> мавжуд булмаса, янги <файл> ташкил килинади. Бу файлнинг кенгайтмасини система автоматик равишда.PRG деб кабул килади. Тахрирловчи (редактор) нинг куриниши куйидагича булади:

Тахрирловчидан CTRL+END тугмачаларни босиб, интерактив режимга утиш мумкин. Дастурни ишга тушириш учун
.DO <файл> командаси берилади. Интерактив режимдан туриб берилган буйрукларни кайта ишлатиш учун пастга ва юкорига стрелкаларини босиш кифоя, чунки бу буйрукларнинг руйхатини система махсус буферда саклаб туради. Системадан чикилганда бу руйхат бекор килинади. (MODIFY ва DO командаларига каранг).
Куйида дастур тузиш учун мухим булган меню тузишни куриб чикайлик.

***** Меню ташкил килиш


set stat off && статус катоpини олиб ташлаш
set talk off && командалаp пpотоколини олиб ташлаш
set colo to b/w,gr+/r+ && pанглаpни уpнатиш gr+ менюни; ************************* pанги, r+ меню фонининг pанги
set messAGE to 24 && билдиpишни 24 сатpга жойлаяпти
set device to screen


@ 0,0 clear && Экpанни тозалаш
@ 1,1 to 22,78 double &&pамка чизиш
@ 3,3 to 10,76 double


@ 6,8 say" ТАБИИЙ ГАЗ БИЛАH ТАЪМИHЛАШ ПPОГPАММАСИ"
@ 8,8 say"Автоp: 27-97 гуpух толиби Обидов Азиз"


@ 13,3 to 15,76 double && pамка чизиш


******** меню тузилиши

@ 14,15 prompt "Сервис" mess 'Киpитиш, тузатиш ишлаpини бажаpиш'


@ 14,30 prompt "Тулов счетлари" mess 'Кидиpиш ва хисоблаш'
@ 14,56 prompt "Чикиш" mess 'Пpогpаммадан чикиш'


menu to n && n - менюнинг номи

do case
case n=1


do kir && kir номли пpогpаммани ишга тушиpиш
case n=2
do ts && ts номли пpогpаммани ишга тушиpиш
case n=3
quit && пpогpаммадан чикиш (MS DOS га)
endcase


Агар меню 2 та булимдан ташкил топган булса,
DO CASE ... ENDCASE командалари урнига IF... ELSE ... ENDIF командаларидан фойдалансак хам булади.
Масалан:
MENU TO n
IF n=1
<1 - ходисага тегишли командалар руйхати>
ELSE
<2 - ходисага тегишли командалар руйхати>
ENDIF

Вазифа. Институтга Фаргона водийсидан келиб укийдиган


студентлар тугрисида куйидаги маълумотларни янги МБ га киритинг:
1) Фамилияси - 20 та позиция;
2) Исми - 15 та позиция;
3) Вилояти - 8 та позиция;
4) Еши - 8 та позиция (еш сана форматида курсатилади);
5) Жинси - 5 та позиция.
Талабалар тугрисида киритилган маълумотларни вилояти ва
жинси буйича саралаш программасини тузинг. Саралаш натижаларини экранга ва принтерга чикаринг.

Download 1,17 Mb.

Do'stlaringiz bilan baham:
1   ...   56   57   58   59   60   61   62   63   ...   69




Ma'lumotlar bazasi mualliflik huquqi bilan himoyalangan ©hozir.org 2024
ma'muriyatiga murojaat qiling

kiriting | ro'yxatdan o'tish
    Bosh sahifa
юртда тантана
Боғда битган
Бугун юртда
Эшитганлар жилманглар
Эшитмадим деманглар
битган бодомлар
Yangiariq tumani
qitish marakazi
Raqamli texnologiyalar
ilishida muhokamadan
tasdiqqa tavsiya
tavsiya etilgan
iqtisodiyot kafedrasi
steiermarkischen landesregierung
asarlaringizni yuboring
o'zingizning asarlaringizni
Iltimos faqat
faqat o'zingizning
steierm rkischen
landesregierung fachabteilung
rkischen landesregierung
hamshira loyihasi
loyihasi mavsum
faolyatining oqibatlari
asosiy adabiyotlar
fakulteti ahborot
ahborot havfsizligi
havfsizligi kafedrasi
fanidan bo’yicha
fakulteti iqtisodiyot
boshqaruv fakulteti
chiqarishda boshqaruv
ishlab chiqarishda
iqtisodiyot fakultet
multiservis tarmoqlari
fanidan asosiy
Uzbek fanidan
mavzulari potok
asosidagi multiservis
'aliyyil a'ziym
billahil 'aliyyil
illaa billahil
quvvata illaa
falah' deganida
Kompyuter savodxonligi
bo’yicha mustaqil
'alal falah'
Hayya 'alal
'alas soloh
Hayya 'alas
mavsum boyicha


yuklab olish