Juma, 2024-04-19, 2:28 PM
Xush kelibsiz! Mehmon

My site

Sayt menyusi
Bo'lim kategoriyalari
Pascal dasturlash tilining darsliklari [15]
Pascal dasturlash tilini o'rganamiz
Bizning ijtimoiy so'rov
Rate my site
Total of answers: 31
Statistika

Jami onlaynlar : 1
Mehmonlar : 1
Foydalanuvchilar : 0
Bosh sahifa » 2015 » Mart » 15 » Pascal dasturlash tili...5-Qism...Standart funksiyalar.
7:42 AM
Pascal dasturlash tili...5-Qism...Standart funksiyalar.

1- A mod B ; A ni B ga bo'lib qoldiqni olish.

2-A div B ; A ni B ga bo'lib butun qismini olish.

Eslatma : div va mod funksiyalarini faqat butun sonlar uchun ishlatish kerak!

3-Round(x) ; X ni yaxlitlash.

4-Trunc(X); X ning butun qismini olish.

5-Frac(X) ; X ni kasr qismini aniqlash.

Masalan: X := 5.8 bo'lsin 

Round(X) = 6;          Trunc(X) = 5; bo'ladi,       Frac(X) = 0.8 .

Misol: n va m natural son berilgan , n sonini m soniga bo'lgandagi qoldiqni aniqlavchi dastur tuzilsin!

Program Qoldiq;                     

Var n, m, q : integer;

Begin 

      Write('N='); ReadLn(n);          Write('M='); ReadLn(m);   q := n mod m ;

      WriteLn('Qoldiq = ', q);

End.

 

Misol: n va m natural son berilgan, n sonini m soniga bo'lib butun qismini aniqlovchi dastur tuzilsin!

Program Butun;

Var n, m, b : integer;

Begin

         Write('N = ');  ReadLn(n);      Write('M = ');  ReadLn(m);     b := n div m ;

        WriteLn(' Butun qismi = ', b);

End.

 

Misol: Bu misolni Trunc foydalanib yechish mumkin.

Program Butun;

Var n, m : integer;    b : Real;

Begin

         Write('N ='); ReadLn(n);      Write('M ='); ReadLn(m);

          b := Trunc(n / m);

WriteLn('Butun qismi = ', b);

End.

 

      Mana siz bilan biroz standart funksiyalar haqida ma'lumotga ega bo'ldik!!! DOIMO BIZ BILAN BO'LING!!!

 

Qo'shimchalar: Rasmlar 1
Kategoriyalar: Pascal dasturlash tilining darsliklari | Ko'rilganlar: 2402 | Tomonidan qo'shilgan: Coder | Teglar: Pascal dasturlash tili 5-qism stand | Reytinglar: 4.0/1
Jami izohlar: 1
avatar
0
1 zafarjura • 6:58 AM, 2015-03-22
Yana ko'proq funktsiyalar xaqida ma'lumot bering
avatar
Kirish
Qidirish
Taqvim
«  Mart 2015  »
YakDushSeshChorPayJumShan
1234567
891011121314
15161718192021
22232425262728
293031
Arxiv maqolalar
//algoritm.ucoz.net