Informatika va axborot texnologiyalari faniga kirish

bu yerda c - o’zgaruvchining nomi, m - butun:6); 

Bu operator  LOLA nomli o’zgaruvchining qiymati uchun 10 ta, RIS - uchun 6 

ta joy ajratadi.  

 

 

2 WRITELN(LES:8:5); 

Bunda LES o’zgaruvchi uzunligi 8 ga teng bo’lib, 5 tasi kasr uchun ajratilgan. 

 

Misol.  

Uchburchakni a,b,c tomonlariga ko’ra balandliklarini hisoblash dasturini tuzing. 

)

)(

)(

(

2

c

p

b

p

a

p

p

a

H

a









)

)(

)(

(

2

c

p

b

p

a

p

p

b

H

b









 

)

)(

)(

(

2

c

p

b

p

a

p

p

c

H

c









p=(a+b+c)/2; 

 

Yechish: 

---

Masalani natijasini olish uchun a, b, c parametrlar asosiy kiritiladigan qiymatlar, 

bu qiymatlarni kiritish uchun   READ operatoridan foydalanamiz. 

Dastur: 

    PROGRAM YE(INPUT,OUTPUT); 

                    VAR A, B, C, P, T, HA, HB, HC: REAL; 

                    BEGIN    READ (A, B, C);  

                                 P:=(A+B+C)/2; 

                         T:=2*SQRT(P*(P-A)*(P-B)*(P-C)); 

                                    HA:=T/A; HB:=T/B; HC:=T/C; 

                   WRITELN (‘HA=’;HA); WRITELN (‘HB=’;HB);             

                   WRITELN (‘HC=’;HC); END. 

Dastur  tuzib  o’zgarmas  va  o’zgaruvchilarni  nomini  yozishda  ularning  qiymatini 

mazmunini ifodalaydigan nomlardan foydalanish maqsadga muvofiq bo’ladi. 

Paskalda  bir  qatorga  bir  necha  operator  yozish  mumkin  bo’lsada,  lekin  ko’p 

hollarda  dasturni  qabul  qilinishi  yomon  oqibatlarga  olib  kelishi  mumkin.  Shuning 

uchun imkoni bo’lsa, alohida yozish tavsiya etiladi.