Algoritmlash p65. p65

1 0 .1 2 - m is o l
n
■D
.Ы  TJ
E
E
■M  CO
^   E
Ё  "
■ f   t
z  n 
о £ 
D) W
BASIC
PASCAL va DELPHI
a=15
Label  N1;
b=13
Var a,b,c:Integer;
c=a+b
Begin
GoToNI
a:=15;  b:=13;
c=a-b
c:=a+b;  GoToN1;
N1  Print c
c:=a-b;
N1: WriteLn(c); 
End.
Bu  dasturlarning  ishlashi  natijasida  ekranda  hosil  bo‘lgan  c 
ning  qiym ati  28  ga  tengdir.  C hunki,  boshqarish  N1  n ish o n li 
chiqarish operatoriga uzatilgani uchun BA SIC  da c =  a—b amalni, 
PASCAL  va  D E L P H I  da  c: =  a—b  am alni  bajarmasdan  o‘tkazib 
yuboriladi.
O‘tish operatorida hech qanday shart tekshirilmasdan boshqarish 
k o ‘rsa tilg a n   n is h o n li  operatorga  u z a tila d i.  L e k in   aksariyat 
masalalarni  hal  etishda  b iro r  shartning  bajarilishiga  qarab  u  yoki 
bu  am allar  k e tm a -k e tlig in i  bajarish  kerak  b o ‘la d i.  M asalan, 
Kam aytiruvchi  musbat  yo ki ju ft  shartini,  Robot  b iro r yo ‘nalishni 
bo‘ sh  e k a n lig i  s h a rtin i  te k s h irib ,  xulosa  asosida  u  y o k i  bu 
ko‘rsatm alarni  bajarishgan  edi.  Shu  kabi  m asalalarni  hal  qilish 
uchun  a lg o ritm ik  tilim iz d a g i  shartli  tuzilm aga  mos  dasturlash 
tilla rid a   tarm oqlanish  o pe ra tori  qo‘lla n ila d i.  Bu  operatorning 
um um iy shakli  quyidagicha:
BASIC:
I f     Then    Else  yoki  operatorlar>
217

---

PASCAL  va  D E L P H I:
I f     Then    Else  yoki  operatorlar>;
Bu  yerda  if,  then va  else  dasturlash  tilin in g   xizm atchi  so‘zlari 
bo‘lib ,  quyida  ularning  o ‘q ilish i  va  ma‘nosi  keltirilgan:
•  I f  (if)  —  "agar",  Then  (zen)  —  "u  holda",  Else  (elz)  —  "aks 
holda";
•  — rost yoki yolg‘on qiymatlardan b irin i qabul qiluvchi 
m antiqiy  ifoda;
•    —  dasturlash  tilin in g   ix tiy o riy  
operatori yoki  operatorlari  ketm a-ketligi bo‘lis h i  m um kin.
Bu tarm oqlanish  operatori qo‘llanm aning V  bobida keltirilgan 
shartli tuzilm aning  ik k in c h i ko ‘rinishining  xuddi  o‘zi.  Yodingizda 
bo‘lsa shartli tuzilm aning b irin ch i ko‘rinishi ham bor edi. Dasturlash 
tilla rid a  ham bor bo‘lib , tarmoqlanish operatorining qisqa ko‘rinishi 
deb  ataladi:
BASIC:
I f     Then  
PASCAL  va  D E L P H I:
I f     Then  ;
Bu operatorlarda ham birikkan shartlardan foydalanish mumkin. 
Faqat  ba‘z i  qoidalarga  rioya  q ilin is h i  shart.
10.13-m isol
Parol  to ‘g‘r i  k iritilg a n in i  tekshiruvchi  dastur tuzing.
Yechish: Parol "inform atika" bo‘lsin, u holda dastur quyidagicha 
b o ‘ladi: